Составьте программу которая запрашивает ввод трех значений температуры и проверяет есть ли среди них температура таяния льда (> 0) паскаль .

YarikPlex YarikPlex    2   03.06.2019 18:00    4

Ответы
макс190 макс190  03.07.2020 23:25
Program fofgogjoj;
var
a,b,c:integer;
begin
Writeln('Введите три значения температуры');
Readln(a,b,c);
if a>0 then
Writeln('1ое значение - температура таяния');
if b>0 then
Writeln('2ое значение - температура таяния');
if c>0 then
Writeln('3е значение - температура таяния');
if (a<=0) and (b<=0) and (c<=0) then
Writeln('Температуры таяния не обнаружено');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика