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

Ввести три действительных числа x, y, z . Вычислить q,w поформулам:q = max(x ⋅ y ⋅ z, 3⋅ z ⋅ x, 2⋅ (x + y + z));w = min(3⋅ x ⋅ y ⋅ z , q/ 2). Вычисленные значения выдать на печать

  1. Ответ
    Ответ дан Aleks1224
    program z1;
    var
    q,x,y,z,a,b,c,d,e:integer;
    w:real;
    begin
    writeln('Введите x');
    readln(x);
    writeln('Введите y');
    readln(y);
    writeln('Введите z');
    readln(z);
    a:=x*y*z;
    b:=3*z*x;
    c:=2*(x+y+z);
    d:=max(a,b);
    e:=max(b,c);
    q:=max(e,d);
    writeln('Максимум',q);
    w:=min(3*x*y*z,q/2);
    writeln('Минимум',w);
    end.

    Получилось немного сложнее, чем я ожидал. :)
    Если что-то непонятно, пиши. :)
    1. Ответ
      Ответ дан Aleks1224
      Не то написал
    2. Ответ
      Ответ дан Aleks1224
      Да
    3. Ответ
      Ответ дан Polixet
      хорошо жду
Самые новые вопросы