Какую задачу решает данный алгоритма?
var x,m:real;
begin
write ('Введите число');
readln (x);
if x>0 then m:=x else m:=-x;
write (m)
end.

соня1584    2   03.05.2020 15:21    1