Предмет: Информатика,
автор: electSDE
Найти произведение всех двухзначных чисел, кратных 3.
Язык программирования : Pascal
Ответы
Автор ответа:
1
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.
Похожие вопросы
Предмет: Другие предметы,
автор: kazhan839
Предмет: Русский язык,
автор: kyza176
Предмет: Литература,
автор: Akinfeef564
Предмет: Математика,
автор: iaslava1998
Предмет: Обществознание,
автор: roksana0898