Question

Составить программу, которая запрашивает ввод температуры тела человека и определяет, здоров он или болен (здоров при 36<t<37)?

Answer 1

var a: real;
begin
write ('Введите Вашу температуру: ');
read(a); //Вещественное число вводится через точку
if (a>=36) and (a<=37) then writeln ('Вы здоровы!') else writeln ('Вы больны!');
end.