• Помогите, пожалуйста, написать программу в Pascal.
    Напишите функцию выбора меньшего из целых чисел. Используйте ее в программе выбора наименьшего из трех чисел.

Ответы 1

  • var a,b,c,m:integer;function min(x,y:integer):integer;beginif x<y then min:=x else min:=y;end;beginwrite('a='); readln(a);write('b='); readln(b);write('c='); readln(c);m:=min(min(a,b),c);writeln('min=',m);end.Пример:a=5b=3c=8min=3
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years