1. Было проведено 9 запусков программы, при которых в качестве значенийпеременных я и k вводились следующие пары чисел:
(1,1); (10, 7); (6,-12); (6,6); (5,2); (-10,-8); (-10, 11); (3,1); (12,8).
Сколько было запусков, при которых программа напечатала «ДА»?
var s, k: integer;
begin
readln(s);
readln(k);
if (s <7) аnd (k <7)
then writeln (ДА)
else writeln ('HET')
end.