Сильно на языке pascalabc.net или turbopascal: 1) разработать программу циклической структурой,используя цикл с параметром. дано действительное число х, натуральное число n. написать программу, которая вычисляет сумму последовательности, заданной формулы x^1/1! +x^2/2! +x^3/3! ++x^n/n! 2) разработать программу циклической структурой в соответствии с предложенным вариантом, используя цикл с предусловием. дано действительное число х, натуральное число n. написать программу, которая вычисляет сумму последовательности, заданной формулы x^1/1! +x^2/2! +x^3/3! ++x^n/n! 3)определить значение z = max (a, 2b) • max (2a-b, b),где max (x, y) есть максимальное из чисел х, у. при peшении определить и использовать функцию max.выполнить отладку программы с заходом в каждую из подпрограмм.
210
437
Ответы на вопрос:
//pascal abc.net 3.1 сборка 1219 //1 var n,i: integer; x,y: real; function fact(x: integer): int64; begin if x> 1 then fact: =fact(x-1)*x else fact: =1; end; begin read(x,n); i: =1; n: =n+1; repeat y: =y+power(x,i)/fact(i); inc(i); until n=i; writeln(y); end. //2 var n,i: integer; x,y: real; function fact(x: integer): int64; begin if x> 1 then fact: =fact(x-1)*x else fact: =1; end; begin read(x,n); i: =1; n: =n+1; while i< > n do begin y: =y+power(x,i)/fact(i); inc(i); end; writeln(y); end. //3 var a,b,z: integer; function max(a,b: integer): integer; begin if a> b then max: =a else max: =b; end; begin read(a,b); z: =max(a,2*b)*max(2*a-b,b); writeln(z); end.
Вязыке unicode 1 символ занимает 2 бита памяти в формулу представляешь значения и получаешь : 2^6(в 6 степени 2 находится)= 64
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
shvok10.09.2022 15:05
-
esketit12305.09.2022 21:20
-
Zmei090709.01.2021 15:56
-
kanevskiygabe28.06.2021 14:45
-
amolodyka10.05.2021 14:32
-
яирхаФ23.01.2022 18:31
-
Viky201629.08.2021 02:52
-
Damirka113718.01.2022 08:29
-
лунтик7231.01.2022 13:39
-
адамиммими127.03.2023 23:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.