Информатика "программирование разветвляющихся алгоритмов" 1. написать программу, определяющую по длинам сторон a. b. c, является ли треугольник равнобедренным. 2. даны радиусы круга и сторона квадрата. у какой фигуры
площадь больше? 3. даны два различных вещественных числа x и y. написать программу возведения наименьшего из чисел в квадрат, наибольшего в куб и нахождения среднего арифметического полученных знаний. метки:
annatokar031
2
08.03.2019 21:50
1
Другие вопросы по теме Информатика
простолера2
10.04.2019 21:48
narigeevag71mariy
10.04.2019 21:58
alex2002fedorov
10.04.2019 22:06
малый6
10.04.2019 20:25
nastyagrng
10.04.2019 20:31
kristinakomaro5
10.04.2019 20:33
Svetkoooo
10.04.2019 20:40
StrangeLis
10.04.2019 20:42
msLolka
10.04.2019 20:42
Популярные вопросы
- O o ooo человек. 5) Язык на нем разговаривают меньше создаётся... лет многими...
2 - 9 Определите виды придаточных в сложноподчиненном предложении. Какой тип подчинения...
1 - Каким бывает детство? м.горького и л. н толстого Сочинение...
2 - Почему Александра Македонского считали врагом саков 5 фактов...
3 - Мәтіннің негізгі және қорытынды бөлімінің мазмұнын ашатын ақпаратты анықта....
2 - Ex.4. Write all types of questions: She has run fifteen kilometers this morning!...
1 - ДВЕ ЗАДАЧИ . ХИМИЯ, ОЧЕНЬ !( 3. На нейтрализацию раствора серной кислот массойИзрасходован...
2 - 1.Проблемы и достижения индустриализации в конце 19 - нач.20 в. 2.Проблемы...
3 - Как писатели раскрывают образ маленького человека...
3 - Как называют человека который один поет к-поп?...
2
var a,b,c,r,x,y:integer;
Begin
read(a,b,c);
if (a=b) or (a=c) or (b=c) then
writeln('Ravnobedrennyj');
read(a,r);
if (a*a>pi*r*r) then writeln('Kvadrat bolshe')
else writeln('Krug bolshe');
read(x,y);
if x>y then writeln(y*y,' ',x*x*x,' ',(x+y)/2);
else writeln(x*x,' ',y*y*y,' ',(x+y)/2);
End.