1. Ввод массива вручную:
var
a:array [1..5] of integer;
i:integer;
begin
for ......
readln (a[ ........]);
for ........
write (a[........]:2);
end.
Помогите дополнить программу,пожалуйста!
var
a:array [1..5] of integer;
i:integer;
begin
for ......
readln (a[ ........]);
for ........
write (a[........]:2);
end.
Помогите дополнить программу,пожалуйста!
More Questions From This User See All
Answers & Comments
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.