Даны действительные числа х у z вывести на печать минимальное из чисел
Помогите прошу!
Function Min(a,b : Integer) : Integer;
Begin
If aend;
Var x,y,z : Integer;
Begin
Readln(x,y,z);
Writeln(Min(Min(x,y),z));
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
