Question

Программу в Pascal Задача: Дано число А если А больше 0 то уменьшить на 8 иначе увеличить на 6.

Answer 1

Ответ:

14

Объяснение:

Число А больше чем 0 и если вычесть 8 получится 6 что бы узнать надо к 6 прибавить 8

Answer 2

Ответ:

равно 48 а буква о мой ответ

Answer 3

Конечно, вот пример программы на Pascal, решающей данную задачу:

pascalCopy code
program ChangeNumber;
var
  A: Integer;

begin
  write('Введите число A: ');
  readln(A);

  if A > 0 then
    A := A - 8
  else
    A := A + 6;

  writeln('Результат: ', A);
end.

В данной программе пользователю предлагается ввести число A. Затем проверяется условие: если A больше 0, то из A вычитается 8, иначе прибавляется 6. Результат выводится на экран.