Сделать блок схему
begin
read(a);
h:=0;
while (a<>0) do
begin
if(a<500)and(a mod 3=0)then h:=h+1;
read(a);
end;
writeln(h);
end.
193
260
Ответы на вопрос:
Популярно: Информатика
-
younightmare30.07.2022 21:03
-
davvechannel13.04.2023 21:09
-
Hondok1310.11.2021 23:47
-
myisipov1erg23.11.2020 09:24
-
КЕКАke23.06.2023 22:31
-
SchoolZnatok14.05.2020 14:14
-
геймер3928.02.2021 22:39
-
slaider127.07.2022 04:05
-
salihvalishev02.09.2020 17:56
-
WallyMF14.03.2022 22:10