Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Program test;
var number: integer;
begin
   write(Enter the number: );
   readln(number);

   number:=abs(number)-2;
   writeln(number);

   readln;
end.