var
t: real;
begin
writeln('Введите температуру:');
readln(t);
if t > 0 then
writeln('Нагревается.');
if t < 0 then
writeln('Замерзает.');
if t = 0 then
writeln('Простой.');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
t: real;
begin
writeln('Введите температуру:');
readln(t);
if t > 0 then
writeln('Нагревается.');
if t < 0 then
writeln('Замерзает.');
if t = 0 then
writeln('Простой.');
end.