Даны действительные числа х у z вывести на печать минимальное из чисел

Помогите прошу!

Question

Антя

5 февраля, 17:44

+1

Ответы (1)

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

Алексина · Answer 1

Function Min (a, b : Integer) : Integer;

Begin

If a
end;

Var x, y, z : Integer;

Begin

Readln (x, y, z);

Writeln (Min (Min (x, y), z));

end.

Даны действительные числа х у z вывести на печать минимальное из чиселПомогите прошу!