При температуре воздуха зимой до -20°С потребление угли тепловой станцией составляет K тонн в день При температуре воздуха от -30° С до -20° С дневное потребление увеличивается на 5 тонн, если температура воздуха ниже -30° С, то потребление увеличивается еще на 7 тонн. Составить таблицу потребления угля тепловой станцией за неделю. Сколько дней температура воздуха была ниже -30° С?

Program gt;
var a:array[1..7]of integer;
k,i,q:integer;
begin
read(k);
q:=0;
for i:=1 to 7 do
read(a[i]);
for i:=1 to 7 do
begin
if(a[i]>-20)then writeln(i, день ,k, тонн угля);
if(a[i]=-30)then writeln(i, день ,k+5, тонн угля);
if(a[i]if(a[i]end;
writeln(q, дней температура было ниже -30);
end.