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

Написать формулы и алгоритм.
Для определения: Можно ли перелить содержимое цилиндрического бака в прямоугольный контейнер без потери жидкости.

  1. Ответ
    Ответ дан petyaGavrikov
    Объем цилиндра = πR²h, объем параллелепипеда = abh
    Программа на паскале:
    var r,h1,a,b,h2,v1,v2:real;
    begin
    writeln('Введите данные цилиндра:');
    write('R = '); readln(r);
    write('h = '); readln(h1);
    writeln('Введите данные параллелепипеда:');
    write('a = '); readln(a);
    write('b = '); readln(b);
    write('h = '); readln(h2);
    v1:=pi*r*r*h1;
    v2:=a*b*h2;
    writeln('V1 = ',v1:5:2,' V2 = ',v2:5:2);
    if v1 <= v2
     then writeln('Yes') else writeln('No');
    end.

    Пример:
    Введите данные цилиндра:
    R = 3
    h = 5
    Введите данные параллелепипеда:
    a = 4
    b = 6
    h = 5
    V1 = 141.37 V2 = 120.00
    No
    1. Ответ
      Ответ дан DennisWhitel
      Спасибо, но уже написал)
Самые новые вопросы