Есть числа x,y,z надо найти Min(x,y,z)

Есть числа x,y,z надо найти Min(x,y,z)
Гость
Ответ(ы) на вопрос:
Гость
var   x,y,z,min:integer; begin   Write('Введите три целых числа: '); Readln(x,y,z);   if x