Question

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

Answer 1

PascalABC:
program n;
var
a: integer;
begin
readln(a);
if a>0
a-=8;
writeln(a);
end.

C#
int: a = 0;
a = Convert.ToInt32(Console.ReadLine());
if (a>0)
{
a-=8;
}
Console.WriteLine(a);

Console.ReadLine();

Answer 2

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

begin
  var n:=ReadInteger;
  if n>0 then n-=8;
  Writeln(n)
end.