Напишите на паскале. : из круга радиуса r вырезан прямоугольник, большая сторона которого равна а. определить радиус круга, который можно вырезать из этого прямоугольника (экстремальные тесты: а=2r, a=1,41421 r)
sophia75
2
20.08.2019 03:30
9
Другие вопросы по теме Информатика
Ravik2K
31.05.2019 11:20
ЛитвиновGLEB
31.05.2019 11:20
FACE229
14.09.2019 11:20
mixer239
28.03.2020 13:15
pandamashenka
28.03.2020 12:55
Khayalnuriev2005
18.07.2019 21:30
Юока
18.07.2019 21:30
DOLTONrus
18.07.2019 21:30
Популярные вопросы
- Напишите о том, что вы делаете (или хотели бы делать) , чтобы быть в форме....
1 - Мальчику купили 3 машины по 5р. и паравоз ценой 15 р.сколько гривен стояла вся...
2 - Презентация на тему: просвящение,устное нородное творчество, в 14-16 века...
3 - Какой эфир одноосновной кислоты подвергается гидролизу, если 41.1 мл этого эфира...
1 - Когда гемоглобин становится фиолетовым, бурым, желтым, зеленым цветом?...
3 - Функция задана формулой у=12х-7. по данным значением аргумента найдите значение...
3 - Напишите структурные формулы следующих веществ: 1)2-деметил гексин-4 2)2-метилгексадиен-1,4...
3 - Какая приставка пишется в слове ? с или з? заранее ....
2 - Найдите корень уравнений. 9y=2y 16z-56=8z 7200: u=8000 q: (270: 90)=6...
1 - Нужно решить уравнение, , . 8(2х-3)+7=4(2-х)-1 и подробно распишите, если не...
1
program figuri;
var
R1,R2,a,b: real;
begin
writeln('vvedite radius R1 opisannoi okrujnosti');
readln(R1);
writeln('vvedite storonu a priamougolnika');
readln(a);
b:=sqrt( (4*sqr(R1)) - sqr(a));
R2:=b/2;
writeln('radius R2 vpisannogo kruga =',R2);
end.