Выдаёт ошибку времени выполнения: Индекс находился вне границ массива.
Что исправить?
program SH;
var
q: integer;
A: array[1..5] of real;
begin
for q := q to 12 do
begin
write('A', 1:2, ']=');
read(A[q]);
end;
end.
Что исправить?
program SH;
var
q: integer;
A: array[1..5] of real;
begin
for q := q to 12 do
begin
write('A', 1:2, ']=');
read(A[q]);
end;
end.
More Questions From This User See All
Answers & Comments
program SH;
var
q: integer;
A: array[1..5] of real;
begin
for q := 1 to 12 do
begin
write('A[', q, ']=');
read(A[q]);
end;
end.