Question

Составить программу, которая запрашивает ввод температуры тела человека и определяет,здоров он или болен

Answer 1

program HelloWorld;

var S: real;

begin

    writeln('Введите значение температуры:');

    readln(S);

    if (s>36.6) then

        writeln('Не здоров!')

    else

      writeln('здоров!')

end.