Регистрация
Юлька6488262
03.02.2023 07:48
Информатика
Есть ответ 👍


паскаль.
даны 3 числа.все отрицательные среди них числа заменить их модулем и снова вывести все числа.

230
323
Посмотреть ответы 2

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

аааааааааппппппааааа
аааааааааппппппааааа
4,6(74 оценок)

pascalabc.net

begin

  var (a, b, c) : = readreal3('введи a, b, c; ');

  if a < 0 then a : = -a;

  if b < 0 then b : = -b;

  if c < 0 then c : = -c;

  println(a, b, c);

end.

на самом деле нет нужды в проверке знака, можно было для всех трех чисел написать по типу a : = abs(a);

kristinalyapina1
kristinalyapina1
4,6(61 оценок)
Var t: integer; beginwrite('t = '); readln(t); if t< -25   then writeln('не нужно идти в школу')   else writeln('нужно идти в школу'); end.пример: t = -32не нужно идти в школу

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