Michael Garciaпосчитайте :даны 2 числа. удвоить каждое из них, если первое число не меньше второго и заменить числа их модулями в противном случае( ПАСКАЛЬ)
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
var
a,b : real;
begin
readln(a,b);
if a >= b then
begin
a := a * 2;
b := b * 2;
end
else
begin
a := abs(a);
b:= abs(b);
end;
writeln(a:5:2,b:5:2);
end.
169
DrelanisЧтобы ответить необходимо зарегистрироваться.
