Ответы
Ответ дал:
0
Ответ:
var
x , sum : integer;
begin
read(x);
while( x <> 0) do begin
if( x mod 3 = 0) and (x mod 10 = 9) then
sum := sum + x;
read(x);
end;
write(sum);
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад