 ok683000 
                                                28.05.2019 09:50
                                                
                                                ok683000 
                                                28.05.2019 09:50
                                             Mariyaftolov 
                                                28.05.2019 10:00
                                                
                                                Mariyaftolov 
                                                28.05.2019 10:00
                                             scrubble 
                                                12.02.2021 11:52
                                                
                                                scrubble 
                                                12.02.2021 11:52
                                             MrVyacheslav228 
                                                12.02.2021 11:52
                                                
                                                MrVyacheslav228 
                                                12.02.2021 11:52
                                             КУМИР566 
                                                12.02.2021 11:52
                                                
                                                КУМИР566 
                                                12.02.2021 11:52
                                             прот5 
                                                27.01.2021 10:54
                                                
                                                прот5 
                                                27.01.2021 10:54
                                             ПолинаSweet11 
                                                09.08.2019 23:30
                                                
                                                ПолинаSweet11 
                                                09.08.2019 23:30
                                             sofyaamosovap0cc8l 
                                                09.08.2019 23:30
                                                
                                                sofyaamosovap0cc8l 
                                                09.08.2019 23:30
                                             sany831 
                                                09.08.2019 23:20
                                                
                                                sany831 
                                                09.08.2019 23:20
                                             mrden3333 
                                                09.08.2019 23:20
                                                
                                                mrden3333 
                                                09.08.2019 23:20
                                            
var n, i, t, min:Integer;
begin
write('Введите число измерений: ');
readln(n);
for i:=1 to n do begin
write(i, '-е измерение равно: ');
read(t);
if t < 0 then
writeln('Воздух холодный')
else
writeln('Воздух горячий');
end;
end.