Решить задание на Pascal.
Приложения:

Ответы на вопрос
Ответил Аноним
0
// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (x, y) := ReadReal2;
var z := x < 0 ? Max(x, y) : Min(x, y);
z.Println
end.
Приложения:

Новые вопросы