Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Var t1, t2, t3 : real;
begin
readln(t1, t2, t3);
if (t1 > 0) or (t2 > 0) or (t3 > 0) then writeln(Есть)
else writeln(Нету);
end.

Числа вводятся через пробел.