Дано целое число Напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора результат
Ответы
Ответ дал:
0
Pascal:
uses GraphABC;
var module, input: integer;
begin
read(input);
module := Abs(input) - 2;
print(module);
end.
uses GraphABC;
var module, input: integer;
begin
read(input);
module := Abs(input) - 2;
print(module);
end.
Ответ дал:
0
Program n1;
var a: integer;
begin
readln(a);
writeln(abs(a)/2);
end.
var a: integer;
begin
readln(a);
writeln(abs(a)/2);
end.
Похожие вопросы
2 года назад
2 года назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад
9 лет назад