Question

Помогите, пожалуйста! Как внести число в массив??? Паскаль. Например n надо внести в массив a

Answer 1

var a:array [1..10] of real;
n:real;
i:integer;
begin
for i:=1 to 10 do
begin
readln(n);
a[i]:=n;
end;
write ('Массив: ');
for i:=1 to 10 do
begin
write (a[i],' ');
end;
end.