Pascal abc. виконати побудову програми: даны действительные - вопрос №4716560 от nvede 21.08.2022 05:32

Question

Информатика: Pascal abc. виконати побудову програми: даны действительные числа a, b, c. проверить выполняется ли неравенство a b c.

nvede · Answer

Var a,b,c:real;begin;readln(a);readln(b);readln(c);if (a b) and (b c) then writeln( Yes ) else writeln( No );end....

Pascal abc. виконати побудову програми: даны действительные числа a, b, c. проверить выполняется ли неравенство a < b < c.