Регистрация
helppliizzzz
13.05.2023 04:08
Информатика
Есть ответ 👍

Определите и выведите на экран количество трехзначных чисел, которые делятся одновременно на 3,5,7 в паскале авс !

291
413
Посмотреть ответы 2

Ответы на вопрос:

tim27012003
tim27012003
4,7(98 оценок)

program zadanie1;

var

i: integer;

begin

for i: =100 to 999 do begin if ( i mod 3 = 0 ) and ( i mod 5 = 0 ) and ( i mod 7 = 0 ) then writeln(i); end;

end.

miroonchickk
miroonchickk
4,8(61 оценок)

Если не ошибаюсь то

А)электронные и механические

Популярно: Информатика