Составте программу для ввода и вывода температуры за наделю. Результат может быть таким:

1

Ответы и объяснения

2012-10-24T21:37:28+04:00

program z1;

var A:array[1..7] of integer;

     i:integer;

begin

for i:=1 to 7 do 

 readln(A[i]);           

for i:=1 to 7 do

 writeln(i,' сентября температура была ', A[i]);

end.