Ответ(ы) на вопрос:
Гостьvar
s,i: integer;
begin
s:=0;
for i:=0 to 50 do
if i mod 6 =0
then s:=s+i;
writeln ('S = ',s)
end.
-----------------------------
S = 216
Не нашли ответ?
Похожие вопросы