М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
sashik2005
sashik2005
22.11.2022 01:31 •  Информатика

Написать программу для ряда : 1.найти сумму трех чисел. 2.катеты прямоугольного треугольника известны.найти гипотенузу. 3.найти среднеарифметическое двух чисел. 4.найти длину окружности,если известна площадь круга. 5.какой процент составляет число а от числа b. 6.найдите площадь треугольника с формулы герона. 7.найдите площадь кольца,если его толщина i см,диаметр внутри круга d см. 8.вычислите площадь треугольника заданного координатами вершин. 9.вычислить длинны сторон треугольника по заданным координатам его вершин. зарание )

👇
Ответ:
Alphons145
Alphons145
22.11.2022
Var
    a, b, c, p: real;
    a1, b1, c1: real;
    a2, b2, c2: real;

function SideLength(a1, a2, b1, b2: real): real;
begin
    SideLength := sqrt(sqr(a1 - b1) + sqr(a2 - b2));
end;

begin
    writeln('1.Найти сумму трех чисел');
    readln(a, b, c);
    writeln(a + b + c);
    
    writeln('2.Катеты прямоугольного треугольника известны.Найти гипотенузу.');
    readln(a, b);
    writeln(sqrt(a * a + b * b));
    
    writeln('3.Найти среднеарифметическое двух чисел.');
    readln(a, b);
    writeln((a + b) / 2);
    
    writeln('4.Найти длину окружности,если известна площадь круга.');
    readln(a);
    writeln(sqrt(a / pi) * 2 * pi);
    
    writeln('5.Какой процент составляет число а от числа b.');
    readln(a, b);
    writeln(a / b * 100);
    
    writeln('6.Найдите площадь треугольника с формулы Герона.');
    readln(a, b, c);
    p := (a + b + c) / 2;
    writeln(sqrt((p - a) * (p - b) * (p - c) * p));
    
    writeln('7.Найдите площадь кольца,если его толщина I см,диаметр внутри круга d см.');
    readln(a, b);
    c := a + b;
    writeln(pi * (c * c - b * b));
    
    writeln('8.Вычислите площадь треугольника заданного координатами вершин.');
    readln(a1, a2, b1, b2, c1, c2);
    writeln(((a1 - c1) * (b2 - c2) - (a2 - c2) * (b1 - c1)) / 2);
    
    writeln('9.Вычислить длинны сторон треугольника по заданным координатам его вершин.');
    a := SideLength(a1, a2, b1, b2);
    b := SideLength(c1, c2, b1, b2);
    c := SideLength(a1, a2, c1, c2);
    writeln(a, ' ', b, ' ', c);
end.
4,4(90 оценок)
Открыть все ответы
Ответ:
Scruff17
Scruff17
22.11.2022

1,2,3,4,5,6,8

Объяснение:

Что напечатается:

1

3

5

6

2

4

6

8

4

6

8

При вызове F(1) печатается 1. Дальше вызовется F(3)

Напечатается 3. Вызовется F(5)

Напечатается 5. F(7) не вызывается, т.к. 7>5

Теперь вызывается вторая функция для F(3), то есть F(6)

Печатается 6. Дальше вызывается вторая функция для F(1), то есть F(2)

Печатается 2. Вызывается первая функция для F(2), т.е. F(4).

Печатается 4. Вызывается первая функция для F(4), т.е. F(6).

Печатается 6. Вызывается вторая функция для F(4), т.е. F(8)

Печатается 8. Вызывается вторая функция для F(2), т.е. F(4)

Печатается 4. Вызываются первая и вторая функции F(6) и F(8)

Печатается 6

Печатается 8

4,4(78 оценок)
Ответ:
оллл11
оллл11
22.11.2022

Проанализируем последовательно утверждения.

Таблицу прилагаю

1. Если верно первое утверждение, то остальные

— неверны. Тогда получается, что две девушки

(Маша и Наташа) не празднуют день рождения

весной (из утверждений 2 и 4), т.е. обе празднуют

его осенью, что противоречит условию задачи.

2. Предположим, что верно утверждение 2

(У Маши день рождения весной, а у Кати -

осенью). В этом случае получается противоречие

в отношении времени рождения Вали: не зимой

(утверждений 1) и не летом (утверждений 3).

А осенью и весной родились Катя и Наташа

(утверждение 2).

3. Предположим, что верно утверждение 3 (У Вали день рождения летом, а у Наташи - весной). Тогда из утверждения 2 получаем: Маша родилась осенью, а Катя - зимой. Это не противоречит утверждению 1. Таким образом, получаем следующее распределение: Маша — родилась осенью, Катя — зима, Валя — летом, Наташа - весной.

Объяснение:

4,6(24 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ