В течение недели температура воздуха составляла 18,20,22,19,17,18,20 градусов. Составьте программу, которая формирует массив констант и выводит значения температуры по дням в столбец в следующем виде:. 1-й день: температура воздуха 18 градусов. 2-й день: температура воздуха 20 градусов.
const
a : array[1..7] of integer = (18, 20, 22, 19, 17, 18, 20);
var r : integer;
begin
for r := 1 to 7 do
writeln(r, '-й день: температура воздуха ', a[r], ' градусов');
end.