Напишите программу. в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен 0) и подсчет количества введеных положительных и отрицательных чисел.
Программу написать в текстовом редакторе блокнот
211
380
Ответы на вопрос:
program z;
var a,i:integer; max:real;
begin
max:=0;
i:=0;
repeat writeln('Введите число'); read(a);
max:=max+a;
i:=i+1;
until a=0;
writeln('Сумма =',max);
writeln('Средние значение =',max/i);
end.
Если Вы хотите меня поблагодарить, сделайте ответ, как Лучший!
i = -101
while i <= -1:
i = i + 1
print (i)
if i == 0:
w = 100
while w >= 1:
w = w - 1
print (w)
Function factorial(n : integer) : biginteger; var i : integer; f : biginteger; begin f : = 1; for i : = 2 to n do f : = f * i; factorial : = f end; var x: integer; begin write('x: '); readln(x); writeln(factorial(x)); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
alexplotnikov20107.01.2023 12:05
-
olgabelova5148706.03.2023 03:05
-
vkristinav0615.07.2021 21:31
-
6hh6h6h18.11.2020 00:39
-
labzaekaterina09.05.2022 14:21
-
polix200817.10.2020 03:19
-
Vika112355678923.08.2021 15:01
-
CrySony114.04.2022 06:14
-
Вирс12310.05.2023 12:00
-
yanamartynova623.05.2020 01:27
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.