Написать программу, определяющую модуль числа (В Паскале)

Question

Федюня

4 декабря, 16:42

+1

Ответы (2)

Знаешь ответ?

Агафья · Answer 1

Var

a:integer;

begin

writeln ('Введите число');

readln (a);

b:=abs (a);

writeln ('Модуль этого числа ', b);

end.

Каздоя · Answer 2

Var a:real;

begin

writeln ('Введите число');

readln (a);

a:=abs (a);

writeln ('Модуль числа равняется ', a);

end.