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

269

440

Посмотреть ответы 2

Ответы на вопрос:

simasmirnovawww

Информатика

4,6(78 оценок)

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 что бы проделывать такую ерунду с любым числом: )