Регистрация
nastasyasaenko
14.08.2020 02:35
Информатика
Есть ответ 👍

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

274
291
Посмотреть ответы 3

Ответы на вопрос:

PASHA993r
PASHA993r
4,7(9 оценок)

напишу на паскале:

var t1,t2,t3: real;

begin

writeln('введите первую температуру: ');

read(t1);

writeln('введите вторую температуру: ');

read(t2);

writeln('введите третью температуру: ');

read(t3);

if t1> 0 or t2> 0 or t3> 0 then do writeln('введена температура таяния льда');

else writeln('такой температуры нет');

end.

nastya2730
nastya2730
4,6(4 оценок)

var t1,t2,t3: integer;

begin

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

readln(t1,t2,t3);

if (t1> =0)or(t2> =0)or(t3> =0)

then writeln('введена температура таяния льда')

else writeln('такой температуры нет');

end.

пример:

введиет 3 значения температуры:

-10 5 -7

введена температура таяния льда

zswdfx
zswdfx
4,5(80 оценок)
Var   i,n, min: : integer; beginrandomize; min: =999;   for i: =1 to 10 do       begin       n: = 1+ random(900);       if   n < min then   min : = n;       end;   writeln ('min=', min) end.

Популярно: Информатика