Дано целое число если оно является положительным то вычесть из него 8. в противном случае...

Question

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

Comments

А где программу писать? Могу в Паскале?

---

Да.

---

А если число ноль???

---

Сложно,просто напиши Pascal. Пожалуйста

Answer 1

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  n:= n>0 ? n-8 : n+6;
  Writeln('n=',n)
end.

Answer 2

Var a:integer;
begin
read(a);
if a>=0 then
write(a-8) else
write(a+6);
end.

Comments

Это если число больше или равно нолю, то вычитаем 8.