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


Turbo Pascal. Человек вводит ширину, длину и высоту куба, потом радиус шара. Определить, поместится ли шар в куб.

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

    если есть д ш и в то это не куб а параллелипипед

    var 

    a,b,c,r:real;

    begin

    readln(a,b,c,r);

    if (2*r<a) and (2*r<b) and (2*r<c)

    then writeln('поместится')

    else writeln ('не поместится');

    end.

    для куба достаточно одного условия (2*r<a) 

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

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