Решить по информатике в паскале 1.с клавиатуры вводят числа. признак окончания ввода чисел число 0.вычислить сумму положительных и отрицательных чисел 2.сначала вводится количество чисел а затем сами числа вычислить количество чисел кратных 3
217
370
Ответы на вопрос:
1) var p,o,s: integer; begin read(s); while s< > 0 do begin if s> 0 then p+=s else o+=s; read(s); end; writeln('сумма положительных ',p); writeln('сумма отрицательных ',o); end. 2) var n,o,s: integer; begin writeln('введите кол-во чисел'); read(n); write('вводите числа по одному '); for var i: =1 to n do begin read(s); if s mod 3 = 0 then o+=1; end; write('кол-во кратных чисел 3 'o); end.
Var a,so,sp: real; begin so: =0; sp: =0; repeat read(a); if a> 0 then sp: =sp+a else so: =so+a; until a = 0; writeln('сумма положительных: ',sp); writeln('сумма отрицательных: ',so); end. var n,k,a: integer; begin write('введите количество чисел: '); readln(n); write('введите сами числа: '); k: =0; for n: = 1 to n do begin read(a); if a mod 3 = 0 then k: =k+1 end; writeln('количество чисел, кратных трём: ',k); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
unna104.07.2020 13:30
-
viktoria2000000018.11.2022 05:58
-
Franikforever7915.06.2023 09:50
-
артур61419.06.2021 12:38
-
diatel8310.05.2021 15:13
-
Daliloshka28.04.2021 11:49
-
fudhchf03.12.2022 01:13
-
Сын12ru03.01.2021 23:31
-
Kotikiwin08.05.2020 05:57
-
adelkasquirrel1115.06.2022 06:32
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.