напишите,пожалуйста, программу:даны целые числа а,в,с если аc ...
напишите,пожалуйста, программу:даны целые числа а,в,с если а<=b<=c то все числа заменить кубами,если a>b>c ,то сменить знак у каждого.В противном случае заменить наимешьшим из них
Есть ответ
17.12.2022
351
Ответ
Program pr;uses crt;Var a, b, c,x1,x2,x3:integer;BeginWriteln('Введите a, b, c');readln(a, b, c);if (ac) thenBegina:=a*(-1);b:=b*(-1);c:=c*(-1);Writeln(a);Writeln(b);Writeln(c);end
elseif (a
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022