Помогите пожалуйста составить программы,мне очень нужно к завтра ,зад 2,3,4...)))
Помогите пожалуйста составить программы,мне очень нужно к завтра ,зад 2,3,4...)))
Гость
Ответ(ы) на вопрос:
Гость 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.
Не нашли ответ?
Похожие вопросы