Question

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

Answer 1

var x:real;beginreadln(x);if x>0 then writeln(x-8)else writeln(x+6);end.