Ответы на вопрос:
Uses crt; const n=15; var a : array [1..99] of integer; i: integer; begin writeln('исходный массив: '); for i: =1 to n do //заполнение массива случайными числами begin a[i]: =random(71)-15; write(a[i],' '); end; writeln; writeln('отсортированный массив: '); for i: =1 to n do begin // проверка на чётность if a[i] mod 2=0 then write(a[i],' '); end; end.
Популярно: Информатика
-
янбаян16.05.2021 09:07
-
zharkovaaa113310.12.2021 14:22
-
danil78212.02.2020 22:13
-
Петья04.06.2021 16:04
-
uylia724.03.2021 14:58
-
oblasovsema28.02.2020 18:55
-
Аайй20.06.2020 16:31
-
SvetaX16X30.01.2020 00:04
-
Ангелина10волкова12014.10.2020 05:35
-
8700952237708.01.2020 08:14