78

Пусть шесть (6) населенных пунктов обозначены номерами от 1 до 6

dstar 02 апреля 2023

Пусть шесть (6) населенных пунктов обозначены номерами от 1 до 6 (величина К) а 5 кандидатов-номерами от 1 до 5 (величина Н). Количество голосов набранныхкандидатами в каждом населенном пункте определяется формулой АКН=рандом (10*3+50). Вывести на экран таблицу результатов голосования, где в строках е данные из населенных пунктов, а в столбцах данные относительно конкурентных кандидатов. Определить и вывести кто из кандидатов набрал максимальное, а кто минимальное количество голосов в четвертом (4) населенном пунктея нашол даные макс. А мин. Никак не могу uses crt; const n=5; k=6; var a: array[1… 10,1… 10] of integer; b: array[1… 10] of integer; i,j,max: integer; Beginclrscr; randomize; for i: =1 to n dobegin for j: =1 to k do begin a[i,j]: =random (10*3+50); write (a[i,j]: 5); end; writeln; end; max: =0; for i: =1 to n do begin if a[i,4]>max then max: =a[i,4]; b[i]: =max; end; writeln; writeln (b[i]: 4); readln; end.

категория: информатика

74

max: =0; for i: =1 to n do begin if a[i,4]>max then max: =a[i,4]; b[i]: =max; end; writeln; writeln (b[i]: 4); честно говоря, не понимаю, зачем здесь используется массив b. Можно сделать такmax: =0; for i: =1 to n do if a[i,4]>max then max: =a[i,4]; writeln; writeln (max); а для минимума все почти так жеconst inf=32767; min: =inf; for i: =1 to n do if a[i,4]

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...