Есть ответ 👍

Дан двумерный массив. найдите сумму и количество элементов в каждом столбце являющихся простыми числами.

103
320
Посмотреть ответы 2

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


Function isprime(n: integer): boolean; { проверка, является ли число простым } var   p: integer;   found: boolean; begin   found: = (n mod 2 = 0);   p: =3;   while (not found) and (sqr(p)< =n) do       begin       found: =(n mod p = 0);       p: =p+2       end;   isprime: =(not found) or (p = 2) end; const   m1 = 20;   n1 = 20; var   a: array[1..m1, 1..n1] of integer;   s,k: array[1..n1] of integer;   i, j, m, n, sum, kol: integer; begin   write('введите через пробел число строк и столбцов массива: ');   readln(m, n);   randomize;   writeln(#13#10, 'исходный массив');   for i : = 1 to m do   begin       for j : = 1 to n do       begin           a[i,j]: = random(99)+1;           write(a[i,j]: 3)       end;       writeln   end;   for j: =1 to n do   begin       sum: =0; kol: =0;       for i: =1 to m do           if isprime(a[i,j]) then           begin sum: =sum+a[i,j]; kol: =kol+1 end;       s[j]: =sum; k[j]: =kol   end;   writeln('*** сумма простых элементов по столбцам ***');   for j: =1 to n do write(s[j]: 4);   writeln;   writeln('*** количество простых элементов по столбцам ***');   for j: =1 to n do write(k[j]: 4);   writeln end. тестовое решение: введите через пробел число строк и столбцов массива: 12 15 исходный массив   36 74 72 75 25 58 26 45 25 51 35 83 34  8 99   53 55  3 51 31  7 65 91 99 95 40 91 86 80 39   61  5 92 50 28 40  7 93 46 46 20  2 61 45 91   85 10 47 49 54 29 15 10 49 13 70 83 73 79 85   67 40 65 85 90 31 90 83 80 59 46 61 57  5 12   6  4 46  9 10 30 44 37 27 11 46 94 44 38 57   57 34 14 61 79 80 37 75 55 60 94 27 67 90  8   67 58  5 37  7 67 37 64 69 55 24  3 38 75 44   36 47 46 23  2 12 47 96 26 31 69 28 91 49 16   4 76 47 19 43 88 89  7 31 90 21 69 45  6 55   78 98  1 11 24 48 80 44 88 96 21 61 79  7 38   39 46 16 54 52 47 55 20 33 56 46 40 16 33 81 *** сумма простых элементов по столбцам ***   248  52 103 151 160 181 217 127  31 114    0 291 280  91    0 *** количество простых элементов по столбцам ***     4    2    5    5    4    5    5    3    1    4    0    5    4    3    0

Костя, два мальчика были против него

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS