Var
i, k: integer;
Begin
writeln('Введите число');
read(k);
i:=k+1;
writeln('Следующее число: ',i);
End.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Var
i, k: integer;
Begin
writeln('Введите число');
read(k);
i:=k+1;
writeln('Следующее число: ',i);
End.