Ответы на вопрос:
Program znanija3; var i, number: integer; begin number: =0; while i < > 10 do begin inc(number); if (number mod 10) = 7 then begin writeln(number); inc(i); end; end; end. p.s. inc(number) = number: = number+1
Популярно: Информатика
-
meonder10.02.2021 08:31
-
artem2006sokol21.11.2020 14:59
-
anastasiyachevh08.03.2022 20:56
-
andreymikilov16.05.2023 10:14
-
demirooova24.01.2023 15:44
-
maivina777777713.10.2022 15:49
-
Ученик22160302.03.2021 10:25
-
daniilraubuhin26.05.2022 09:05
-
andryshaua111.05.2020 03:57
-
Dariasolne4naya02.08.2021 01:50