Помогите пожалуйста составить программы,мне очень нужно к завтра ,зад 2,3,4...)))
Приложения:
Ответы на вопрос
Ответил rgmod
0
N2
var i,k:integer;
A: array [0..6] of integer;
begin
for i:=0 to 6 do
begin
readln (A[i]);
end;
for i:=0 to 6 do
writeln( A[i]);
end.
var i,k:integer;
A: array [0..6] of integer;
begin
for i:=0 to 6 do
begin
readln (A[i]);
end;
for i:=0 to 6 do
writeln( A[i]);
end.
Новые вопросы