Question

Решите задание:
Var s, k: integer;
begin
readln (s);
readln (k);
if s div 3 = k then writeln ('ДА')
else writeln ('НЕТ')
end.

Было проведено 9 запусков программы, при которых в качестве значений переменных s и k вводились следующие пары чисел:
(9, 3); (12, 8); (4, 1); (7, 3); (6, 2); (10, 2); (24, 7); (15, 4); (8,1).

Answer 1

5 раз

(9, 3); (12, 8); (4, 1); (7, 3); (6, 2); (10, 2); (24, 7); (15, 4); (8,1).

тут загвоздка в том, что div - деление нацело, т.е. например при вводе 24,7 будет выведено да ( 24/7 = 3,4285...)