Определить среднее арифметическое
всех элементов прямоугольной матрицы
с элементами целого типа.
var a:aray[1..10, 1..10] of integer;
I,S,K:integer;
Begin
For I = 1 to n do
For J = 1 to m do readln(a[i,j])
S:=0; K:=0;
(Дальше вы продолжаете)
120
335
Ответы на вопрос:
Var x, otrc, poloz: integer; begin repeat write('введите число: '); readln(x); if x > 0 then inc(poloz); if x < 0 then inc(otrc); until x = 0; writeln('количество положительных чисел: ', poloz); writeln('количество отрицательных чисел: ', otrc); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
1Polina221108.12.2022 07:36
-
sembaevam28.09.2022 15:20
-
Lelikc09.11.2021 03:15
-
milanaberezova17.05.2020 14:21
-
marinaovechkina27.06.2023 06:58
-
mneo9817.07.2022 11:53
-
Воздух518.02.2023 20:18
-
Дракон232315.07.2022 17:24
-
Marinakaleda16.04.2020 22:12
-
masaynay22mailru01.04.2020 18:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.