Народ, помгите!!!Составьте алгоритм нахождения суммы всех двухзначных чисел, кратных трем, используя цикл с параметром
Народ, помгите!!!Составьте алгоритм нахождения суммы всех двухзначных чисел, кратных трем, используя цикл с параметром
Ответ(ы) на вопрос:
var
i:integer;
begin
for i:=12 to 99 do
if (i mod 3)=0 then Write(i:3)
end.
Тестовое решение:
12 15 18 21 24 27 30 33 36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84 87 90 93 96 99
Не нашли ответ?
Похожие вопросы