Задание:
Составить программу, которая запрашивает ввод температуры тела человека и определяет, здоров он или болен (здоров при 36
Решение:
Var a: real; beginwrite ('Введите Вашу температуру: '); read (a); //Вещественное число вводится через точкуif (a>=36) and (a <= 37) then writeln ('Вы здоровы! ') else writeln ('Вы больны! '); end.
Знаете другой ответ?