Дано целое число Напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора результат
Ответы на вопрос
Ответил nchashin
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.
Ответил AnonimusPro
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.
Новые вопросы