• составить программу вычиcления объема цилиндра при радиусах R и высоте H,по формуле V=P*R*R*H

Ответы 2

  • Program pr;

    Var V, P, R, H:real;

    Begin

    Writeln('Введите R');

    readln(R);

    Writeln('Введита H');

    readln(H);

    V:=3,14*R*R*H;

    Writeln('V=, V');

    readln;

    end.

    • Автор:

      jalen
    • 6 лет назад
    • 0
  • var

    p,r,h:real;

    begin

    readln(p,h);

    v:=Pi*sqr(r)*h;

    writeln(v:5:3);

    end;

    • Автор:

      alijah
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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