Дано целое число .Напишите программу , которая уменьшает на 2 модуль этого числа и выводит на экран монитора результат.

Вопрос пользователя:

Дано целое число .Напишите программу , которая уменьшает на 2 модуль этого числа и выводит на экран монитора результат.

Илюха отвечает:

Program vvl;

Var x:integer;

      V:real;

Begin

Write(‘x=’);

Readln (x);

V:= abs(a)-2;

Writeln (‘V=’; V:2:1);

End.

Добавить свой ответ