Ответы на вопрос:
1) var a: integer; s: real; begin {первый способ} s: =0; for a: = 1 to 50 do s: =s+1/a; writeln('s = ',s); {второй способ} s: =0; a: =1; repeat s: =s+1/a; a: =a+1; until a> 50; writeln('s = ',s); {третий способ} s: =0; a: =1; while a< =50 do begin s: =s+1/a; a: =a+1; end; writeln('s = ',s) end. var x: real; begin x: =-3; repeat writeln('y(',x,') = '*x*x-2)/4): 0: 3); x: =x+0.2 until x> 3.2; end. var a: real; k,i: integer; begin k: =0; writeln('введите десять чисел'); for i: = 1 to 10 do begin read(a); if a< 0 then k: =k+1 end; writeln('k = ',k) end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ivanovayo0808.01.2021 00:58
-
Kotmi67916.08.2022 17:44
-
fggda9820.05.2020 20:25
-
Ronaldinho200316.06.2023 05:31
-
polinaponomare121.05.2023 12:07
-
полинка2007212.11.2021 04:51
-
Зимаа102.01.2023 22:26
-
0HIMiK028.10.2020 10:36
-
annagutsman27.09.2020 16:26
-
nikeenokyana23.07.2020 14:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.