СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ ABC - вопрос №11296194 от lera645 17.08.2020 02:06

Question

Информатика: СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ ABC

lera645 · Answer

program tempa;

var

t: real;

begin

writeln('Введите температуру человека: ');

readln(t);

if t <> 36.6 then writeln('Болен')

else writeln('Здоров');

readln;

end.