VAR
t:integer;
BEGIN
write('Введите температуру: ');
readln(t);
if t>60 then writeln('Пожароопасная ситуация')
else writeln('Температура не пожароопасная');
END.
VAR
t:integer;
BEGIN
write('Введите температуру: ');
readln(t);
if t>60 then writeln('Пожароопасная ситуация')
else writeln('Температура не пожароопасная');
END.