написать программу на паскале которая находит количество трёхзначных чисел делящихся на 14 и на 17 одновременно а также выводит эти числа на экран
Ответы
Ответ дал:
0
rogram zadanie1;
var
i:integer;
begin
for i:=100 to 999 do
Begin
if ( i mod 14 = 0 ) and ( i mod 17 = 0 )
then writeln(i);
end;
end.
ВРОДЕ как-то так
Вас заинтересует
3 года назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад