Ответы
Ответ дал:
0
var I,s:integer;
begin
writeln('Summa ....');
for i:=100 to 999 do
if i mod 17 =0 then s:=s+i else s:=s+0;
writeln(s)
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад