Ответы на вопрос:
Var ars: array[1..9] of integer; i: integer; begin for i: =1 to 9 do begin read(ars[i]); if length(ars[i])=3 then ars[i]: =' '; end; writeln('final array: '); for i: =1 to 9 do writeln(ars[i]); end.
Популярно: Информатика
-
123681113.02.2020 14:37
-
Aye0326.01.2023 06:05
-
Valya5555555519.05.2023 15:51
-
amiralimurodov30.04.2021 19:05
-
Killerman6828.09.2022 04:58
-
znasta74519.03.2022 18:02
-
kghhyyggr45604.12.2022 05:19
-
krasotka50505025.06.2022 13:36
-
Kirich0ult28.10.2020 16:21
-
Fatima8209.05.2022 00:21