Ирусик1996анапа
Опубликовано 7 лет назад по предмету Информатика от Ирусик1996анапа


Сосуды цилиндрической формы заполнены до краёв жидкостью плотностью d=1200кг/м3. Составьте программу в Pascal ABC которая найдёт суммарную массу жидкости.

  1. Ответ
    Ответ дан sinerDt

    program mss;uses crt;var v,m,h,r:real;beginclrscr;writeln('Введите радиус');readln(r);writeln('Введите высоту');readln(h);v:= 3.14*sqr(r)*h;m:= 1200*v;writeln('   ',m:2:2,' кг');readln;end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц