Есть ответ 👍

Користувач вводить два числа. Якщо вони не рівні 10 і перше число парне, то вивести їх суму, інакше вивести їхнє множення. Язык C#

218
410
Посмотреть ответы 1

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


Type   m = array[,] of integer; // двумерный динамический   v = array[1..2] of integer; // одномерный статический function npos(pm: m): integer; var   i, j, p: integer; begin   p : = 0;   for i : = 0 to length(pm, 0) - 1 do       for j : = 0 to length(pm, 1) - 1 do           if pm[i, j] > 0 then p : = p + 1;   npos : = p end; function nneg(pm: m): integer; var   i, j, p: integer; begin   p : = 0;   for i : = 0 to length(pm, 0) - 1 do       for j : = 0 to length(pm, 1) - 1 do           if pm[i, j] < 0 then p : = p + 1;   nneg : = p end; procedure getv(a: m; var c: v); begin   c[1] : = npos(a);   c[2] : = nneg(a) end; procedure initm(var a: m); var   i, j: integer; begin   for i : = 0 to length(a, 0) - 1 do       for j : = 0 to length(a, 1) - 1 do           a[i, j] : = random(100) - 50 end; procedure printm(a: m); var   i, j: integer; begin   for i : = 0 to length(a, 0) - 1 do   begin       for j : = 0 to length(a, 1) - 1 do           write(a[i, j]: 4);       writeln   end end; var   a1, a2, a3: m;   b1, b2, b3: v;   n1, m1, n2, m2, n3, m3: integer; begin   randomize;   writeln('введите число строк и столбцов массива');   readln(n1, m1);   setlength(a1, n1, m1);   initm(a1);   writeln('массив а1');   printm(a1);   getv(a1, b1);   writeln('количество положительных ', b1[1], ', количество отрицательных ', b1[2]);   writeln('введите число строк и столбцов массива');   readln(n2, m2);   setlength(a2, n2, m2);   initm(a2);   writeln('массив а2');   printm(a2);   getv(a2, b2);   writeln('количество положительных ', b2[1], ', количество отрицательных ', b2[2]);   writeln('введите число строк и столбцов массива');   readln(n3, m3);   setlength(a3, n3, m3);   initm(a3);   writeln('массив а3');   printm(a3);   getv(a3, b3);   writeln('количество положительных ', b3[1], ', количество отрицательных ', b3[2]); end. тестовый прогон: введите число строк и столбцов массива 3 3 массив а1     6  11 -46   24 -41  36   44    9  18 количество положительных 7, количество отрицательных 2 введите число строк и столбцов массива 2 4 массив а2   37  -4  -2  43   -18  36    0  44 количество положительных 4, количество отрицательных 3 введите число строк и столбцов массива 5 2 массив а3     5 -15   49  -1   -40  35   -33  -9   -22 -31 количество положительных 3, количество отрицательных 7

Реши свою проблему, спроси otvet5GPT

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS