Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы
Гость