Дан круг радиуса R. Найти, поместиться ли верный треугольник со гранями

Дан круг радиуса R. Определить, поместиться ли верный треугольник со сторонами а в этом круге. Для программки Qbasic

Задать свой вопрос
1 ответ
Qbasic CLS INPUT "R = ", R INPUT "a = ", a IF R lt; a / SQR(3) THEN PRINT "No" ELSE PRINT "Yes" END IF Pascal: var Skv, Skr, stor, diag, diam: double; begin write(Площадь квадрата = ); readln(Skv); write(Площадь круга = ); readln(Skr); stor := sqrt(Skv); diag := stor * sqrt(2); diam := 2 * sqrt(Skr / pi); write(Круг ); if diam gt; stor then write(не ); writeln(помещается в квадрат.); write(Квадрат ); if diag gt; diam then write(не ); writeln(вмещается в круг.); readln end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт