Ответы на вопрос:
1) var f: real; x, i: integer; begin readln(x); if (x < 0) then f : = cos(x); if ((x > 0) and (x < = 2)) then f : = exp(ln(2) * x); writeln('f(', x, ') = ', f); end.2)var x, y, z, m: real; begin readln(x, y, z); m : = x + y; if (x < m) then m : = x; if (m > z) then m : = z; if (m > x * y * z) then m : = x * y * z; writeln(m); end.вот, проверил =)
Var r,n,m,max,k,el,sumh,sumnh: integer; c: array[0..9]of integer; sh,snh: real; begin for r: =0 to 9 do begin c[r]: = random(50)-25; write(c[r]: 4); if r mod 2 = 0 then sumh : = sumh + c[r] else sumnh: = sumnh + c[r]; end; sh: = sumh/5; snh: = sumnh/5; writeln; writeln('среднеарифметическое элемент с четными индексами ',sh: 6: 4); write('среднеарифметическое элемент с четными индексами ',snh: 6: 4); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
KitKat32145630.04.2023 21:03
-
ВРотКомпот01.05.2023 22:01
-
inomgafur22.11.2021 04:59
-
flanchase26.05.2022 18:19
-
Chekchik30.03.2021 10:14
-
peter070723.07.2020 02:47
-
artem11061624.11.2020 21:28
-
kokoulina6806.04.2021 22:05
-
kmtva0420.12.2021 22:03
-
nusbek17.10.2020 20:53
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.