Дано целое число .Напишите программу , которая уменьшает на 2 модуль этого числа и выводит на экран мониторарезультат.
Program vvl; Var x:integer; V:real; Begin Write('x='); Readln (x); V:= abs(a)-2; Writeln ('V='; V:2:1); End.