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

program pr; var i: integer; mas: array[1… 7]of integer; beginfor i: =1 to 7 do beginwriteln ('Введите температуру ', i ,' сентября'); readln (mas[i]); end; for i: =1 to 7 do writeln (i, ' сентября температура была ' mas[i]); readln; end.