Напишите программу, в которой вводится целое число, в результате выводится число следующее за ним.
(Блок-схема + программа)
Пожалуйста)

Var  

  i, k: integer;

Begin

 writeln('Введите число');  

 read(k);

 i:=k+1;

 writeln('Следующее число: ',i);

End.