Question

1. Ввод массива вручную:
var
a:array [1..5] of integer;
i:integer;
begin
for ......
readln (a[ ........]);
for ........
write (a[........]:2);
end.

Помогите дополнить программу,пожалуйста!

Answer 1

var

a:array [1..5] of integer;

i:integer;

begin

for i := 1 to 5 do

readln (a[i]);

for i := 1 to 5 do

write (a[i]:2);

end.