Ответы на вопрос:
1) var i : integer; begin writeln('фунты кг'); for i: = 1 to 10 do writeln(i: 3, ' ', i * 0.4: 0: 1); end. 2) var i : integer; begin writeln('фунты кг'); while i < = 10 do begin writeln(i: 3, ' ', i * 0.4: 0: 1); i: = i + 1; end; end. 3) var i : integer; begin writeln('фунты кг'); repeat writeln(i: 3, ' ', i * 0.4: 0: 1); i: = i + 1; until i > 10 end.
Популярно: Информатика
-
POZZITIFFON3415.09.2022 17:48
-
супермарио316.10.2022 23:08
-
yasenchuk02ozo83d19.03.2020 06:32
-
Duglas1714.08.2020 13:13
-
artkeyn112.02.2023 01:03
-
366726.03.2022 17:07
-
chernovitskaya130.07.2021 02:11
-
Valensia5901.08.2021 14:40
-
Vikos00922.11.2021 13:18
-
nikolay94620.06.2021 09:49