Ответы на вопрос:
program Hello;
var i:integer; A:array[1..7] of integer;
begin
for i:=1 to 7 do begin
writeln('Элемент массива ', i, ': ');
readln(A[i]);
end;
writeln('Введите номер элемента!');
readln(i);
writeln(A[i]);
end.
Популярно: Информатика
-
чибик22819.07.2021 11:10
-
dabushov9526.06.2023 06:57
-
zanunkyk22.04.2023 09:31
-
ева1996125.05.2020 16:24
-
Матрос57311.09.2022 03:36
-
ЮлияСалт22.06.2023 19:05
-
shaxnozik141205.11.2020 08:51
-
yanochka13kol23.04.2021 13:49
-
Ekaaaterina23.10.2021 09:26
-
vadimkaIVA02.04.2020 03:47