Введите
с клавиатуры целое число. Выведите на экран следующие число, удвоенное
значение числа, противоположное число, модуль числа, квадрат числа.

Program abc;
var a,b,c,d,e,f:integer;
begin
readln(a);
b:=a+1;
c:=a*2;
d:=a*(-1);
e:=abs(a);
f:=sqr(a);
writeln(Следующее число=, ,b, ,Удвоенное число=, ,c, ,Противоположное число=, ,d, ,Модуль числа=, ,e, ,Квадрат числа=, ,f);
end.
Вот тебе программа для Pascal что бы проделывать такую ерунду с любым числом:)

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.