Напишите программу поиска всех двузначных чисел, кратных 17 и заканчивающихся ** 7 или 9

0 голосов
66 просмотров

Напишите программу поиска всех двузначных чисел, кратных 17 и заканчивающихся на 7 или 9


Информатика (19 баллов) | 66 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var
i: integer;
begin
for i:=10 to 99 do
if (i mod 17 = 0) and ((i mod 10 = 7) or (i mod 10 = 9)) then
writeln(i);
end.

(15.5k баллов)