1) Напишите программу, которая считывает целое число N и выводит следующее число за ним и предыдущее число.
Программу написать PascalABC.NET Даю 50 балов!!!!!!!!Срочно пожалуйста!!!!


BobbyFresnel: begin
var n := ReadInteger;
Print(Pred(n), Succ(n))
end.
BobbyFresnel: Написал тут, потому что место ответа заспамлено.
BobbyFresnel: Если надо сначала следующее, потом предыдущее, то Pred и Succ поменять местами
maks857: Спасибо
BobbyFresnel: Пожалуйста

Ответы

Ответ дал: Омскаяптица
1

var

N:integer;

begin

readln(N);

 writeln (N-1, ' ', N+1);

end.


maks857: Спасибо
Mindsk: О Привет ты мог бы помочь там с Информатикой или ты не делаешь конспекты
Омскаяптица: Я не делаю конспекты
Вас заинтересует