Синформатикой ( , с блок схемами и самой программой) 1.предположим, фирма заработала какую-то сумму денег- эту сумму запросите у пользователя. по законодательству из этой суммы следует перечислить в налог 23%. далее 39% идет на зарплату. составьте программу, которая рассчитает, какую сумму получит пользователь после выплаты всех налогов и зарплаты. 2. составьте программу, которая позволит для любых заданных дробных чисел ( их нужно запросить у пользователя) найти их целые части, сумму этих целых частей. 3. составьте программу, которая по заданным сторонам треугольника( их нужно запросить у пользователя) определяет его площадь. напомню, что площадь можно вычислить по формуле герона s= квадратный корень от (p*(p-a)*(p-b)*(p- где p- полупериметр, a,b,c- стороны треугольника, которые надо запросить. результат выведите с двумя знаками после запятой.
104
415
Ответы на вопрос:
{1} var n: integer; begin write ('введите заработанную сумму: '); readln (n); write ('вы получите: ', (n*0.77)*0.61) end. {2} var a: array of double; n, i: byte; sum: longint; begin write ('введите кол-во дробных чисел: '); readln (n); setlength (a, n); for i: =0 to n-1 do begin write ('введите ', i+1, ' число: '); readln (a[i]); end; for i: =0 to n-1 do begin writeln ('целая часть ', i+1, ' числа: ', trunc(a[i])); inc (sum, trunc(a[i])); end; write ('сумма целых частей: ', sum); end. {3} var a, b, c, p: double; begin write ('введите стороны треугольника: '); readln (a, b, c); if (a> =(b+c)) or (b> =(a+c)) or (c> =(b+a)) or (a< =0) or (b< =0) or (c< =0) then write ('такой треугольник не существует') else begin p: =(a+b+c)/2; write ('его s = ', sqrt (p*(p-a)*(p-b)*(p-c)): 7: 2, ' ед^2' ); end; end.
1. 29: 6=4, остаток 5, 4: 6=0, остаток 4, итого 45(в шестеричной системе). 29: 8=3, остаток 5, 3: 8=0, остаток 3, итого 35(в восьмеричной системе). 29: 12=2, остаток 5, 2: 12=0, остаток 2, итого 25 (в двенадцатеричной). ответ: 6,8,12 2. 129(10)=1004(q) 129(10)=1*q^3+0*q^2+0*q^1+4*q^0=q^3+4. q=5 ответ: система счисления числа 1004, это 5.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
devochka000118.09.2020 22:32
-
Айдан123121.01.2021 01:02
-
пике501.12.2021 09:46
-
ЛёхаТихонов12.03.2023 09:27
-
Лиля17703.10.2022 12:47
-
Христина85403.02.2021 13:44
-
Irynadv29.07.2022 16:53
-
Janiya140428.08.2022 13:08
-
Slipknot5547987654427.12.2020 12:28
-
поорд09.03.2021 00:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.