Найти сумму чисел, кратных 3 от 1 до 100.

Reixerrr Reixerrr    1   20.08.2019 14:50    1

Ответы
GretaD GretaD  05.10.2020 07:27
Program n1;
var S, i: integer;
begin
S:=0;
for i:=1 to 100 do
if (i mod 3 =0) then S:=S+i;
writeln(S);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика