Ответы на вопрос:
Program zhn; type atype = array of integer; var n,i: integer; a: atype; begin write('введите количество элементов в массиве: '); readln(n); setlength(a,n); for i: =0 to n-1 do begin a[i]: =random(100); if i mod 2 = 0 then writeln(i,') ',a[i]); end; end.
Популярно: Информатика
-
zhenyasvetli4n25.07.2020 18:23
-
miwe1006.09.2021 21:36
-
akselroddasha11.11.2021 00:36
-
Айшат7727001.06.2021 12:57
-
wolfe820.09.2020 15:59
-
fffffffhhhhhh04.03.2022 14:58
-
Тарана11лет945610.05.2023 12:01
-
kamilfox02.03.2020 13:53
-
barslkbarslk13.10.2020 04:13
-
tatyanakarp17.05.2020 22:58