Var a : integer;beginwriteln('Введите температуру: ');read(a);if (a<31) and (a>10) then writeln('Жарко');if (a>0) and (a<11) then writeln('Прохладно');if a>30 then writeln('Температура не соответстувет условию 0<t<30');if a<1 then writeln('Температура не соответстувет условию 0<t<30');end. Т.к при копировании текста из паскаля строки сливаются- нормальный ответ в комментарии
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
