Найти произведение всех двухзначных чисел, кратных 3.
Язык программирования : Pascal

13t2t 13t2t    3   15.02.2021 18:28    2

Ответы
vasutа vasutа  17.03.2021 18:32

var

pr : longint;

i : integer;

begin

pr := 1;

for i := 10 to 99 do

if (i mod 3 = 0) then

pr := pr * i;

writeln(pr);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика