Нужно сделать программу по этому заданию. Паскаль. Дано число. Если оно положительно, то вычесть из него 8, в противном случае прибавить к нему 6. Вывести полученное число

Вот пример программы на языке Паскаль, которая решает описанную задачу:

pascal
Копировать код
program ModifyNumber;
var
  num: Integer;
begin
  // Ввод числа
  ReadLn(num);
  // Условие: если число положительное, вычитаем 8, иначе прибавляем 6
  if num > 0 then
    num := num - 8
  else
    num := num + 6;
  // Вывод результата
  WriteLn(num);
end.

Описание работы программы:

1. Программа сначала считывает число.

2. Затем проверяется, является ли число положительным (больше нуля).

3. Если число положительное, из него вычитается 8. Если оно не положительное (отрицательное или ноль), к нему прибавляется 6.

4. Результат выводится на экран.