Создайте программу на паскале, которая будет здороваться с вами и спрашивать какая у вас температура (если больше 37, то сказать лечится дома. если меньше 36 тоже сказать сидеть дома. если 36-37, то идти в школу. (программа диалог)

Program dialog;
var
a: integer;
begin
writeln('Привет! Какая у вас температура? ');
readln(a);
if a>37 then
writeln('Лечитесь дома')
else if a<36 then
writeln('Седите дома')
else
writeln('Идите в шоклу');
end.