Напишите программу в pascal,которая запрашивает у пользователя числа и считает их сумму до тех пор пока пользователь не введёт число 44.после того программа должна прекратить запрашивать числа и вывести пользователю сумму.
193
306
Ответы на вопрос:
Var a,b: integer; begin writeln('не вводите 44'); while b< > 44 do begin writeln('число, '); a: =a+b; readln(b); end; write(a,' - это сумма тех чисел, которые вы вводили'); end.
Begin var a: array [0..99] of integer; var i, k: integer; write('[ '); for i : = 0 to 99 do begin a[i] : = random(64); write(a[i], ' '); end; writeln(']'); for i : = 0 to 49 do begin k : = a[i]; a[i] : = a[99 - i]; a[99 - i] : = k; end; write('[ '); for i : = 0 to 99 do write(a[i], ' '); writeln(']'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Romays11.03.2021 01:14
-
Gagoro26.10.2021 15:46
-
yan012505.06.2023 06:21
-
aveiro103.04.2023 09:42
-
Агент27112.02.2023 17:39
-
magamedgalaev903.04.2021 04:34
-
Лубаша15.02.2020 22:11
-
МозгЗнанияПамять07.02.2021 20:51
-
tanya211928620.10.2020 02:46
-
Aleusand02.01.2022 00:27
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.