Напишите программу. в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен 0) и подсчет количества введеных положительных и отрицательных чисел.

Программу написать в текстовом редакторе блокнот

211

380

Посмотреть ответы 3

Ответы на вопрос:

rival6

Информатика

4,4(100 оценок)

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.

Если Вы хотите меня поблагодарить, сделайте ответ, как Лучший!

Seallk

Информатика

4,5(26 оценок)

i = -101

while i <= -1:

i = i + 1

print (i)

if i == 0:

w = 100

while w >= 1:

w = w - 1

print (w)

Maксим56

Информатика

4,7(48 оценок)

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

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.