Дано целое число. Если оно является положительным, то прибавить к нему 3; в противном случае вычесть из него 2. Вывести полученное число. УМОЛЯЮЮЮ ЛЮДИИИ
Дано целое число. Если оно является положительным, то прибавить к нему 3; в противном случае вычесть из него 2. Вывести полученное число. УМОЛЯЮЮЮ ЛЮДИИИ
var x: integer;
begin
Write('Ведите целое число: '); ReadLn(x);
if x >= 0 then x := x + 3 else x := x - 2;
WriteLn('x = ', x);
end.
Объяснение: