profile
Опубликовано 5 лет назад по предмету Информатика от MaryaChugaeva

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

  1. Ответ
    Ответ дан APALoff
    Function Min(a,b : Integer) : Integer;
    Begin
      If a<b then Min:=a else Min:=b;
    end;
    Var x,y,z : Integer;
    Begin
      Readln(x,y,z);
      Writeln(Min(Min(x,y),z));
    end.
    1. Ответ
      Ответ дан MaryaChugaeva
      спасибо огромное
Самые новые вопросы