0 / 0 / 0
Регистрация: 15.02.2010
Сообщений: 10
1

Сформировать одномерный массив из количества ненулевых элементов каждой строки матрицы.

15.02.2010, 18:25. Показов 1998. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
№ 1
С помощью генератора чисел сформировать матрицу А. Вывести её. Сформировать одномерный массив из количества ненулевых элементов каждой строки матрицы.
№ 2
Ввести массив из 9-ти элементов. Определить номер последнего положительного элемента.
№ 3
Пусть 6 населённых пунктов обозначенных номерами от 1 до 6 (величина к), а 5 кандидатов номер от 1 до 5 (n) . Количество голосов, набранных кандидатами определяется по формуле ак=random(10i+50) гдеI номер варианта (№ 7) .Вывести на экран таблицу результатов ,где значение строк –данные населённых пунктов, а столбцы данные по конкретным кандидатам. Построить одномерный массив исходя из: «Кто из кандидатов имеет максимальный рейтинг»?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.02.2010, 18:25
Ответы с готовыми решениями:

Сформировать одномерный массив из минимальных элементов каждой строки матрицы
2. Дано матрицу, состоящую из К строк и М столбцов. Сформировать одномерный массив из минимальных...

Сформировать одномерный массив из количества ненулевых элементов строк матрицы
Всем привет, помогите пожалуйста с программой! Очень срочно нужно, завтра контрольная! Сформировать...

Сформировать одномерный массив из количества ненулевых элементов строк матрицы
Очень нужна помощь в решении задачи, помогите пожалуйста: Сформировать одномерный массив из...

Сформировать одномерный массив из количества элементов каждой строки матрицы, больших заданного числа
Дан двумерный массив размером 4*6 и заполненный целыми числами с клавиатуры. сформировать...

2
654 / 352 / 113
Регистрация: 11.12.2009
Сообщений: 508
15.02.2010, 20:04 2
1:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
uses crt;
var
   a:array[1..100,1..100] of integer;
   i,j,m,n,k:integer;
   b:array[1..100] of integer;
begin
clrscr;
write('Ââåäèòå êîëè÷åñòâî ñòðîê=');
readln(n);
write('Ââåäèòå êîëè÷åñòâî ñòîëáöîâ=');
readln(m);
writeln('Èñõîäíàÿ ìàòðèöà');
randomize;
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(51)-10;
    if (a[i,j]<>0) then k:=k+1;
    write(a[i,j]:3);
   end;
  writeln;
 end;
writeln('Ìàññèâ èç êîëè÷åñòâà íåíóëåâûõ');
for i:=1 to k do
 begin
  b[i]:=random(51)-10;
  write(b[i]:3);
 end;
readln
end.
Добавлено через 2 минуты
2:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
var
   a:array[1..9] of integer;
   i,j,n:integer;
begin
clrscr;
writeln('Ìàññèâ');
randomize;
for i:=1 to 9 do
 begin
  a[i]:=random(51)-10;
  write(a[i]:3);
  if (a[i]>0) then n:=i;
 end;
writeln;
writeln('Íîìåð ïîñëåäíåãî ïîëîæèòåëüíîãî ýëåìåíòà ',n);
readln
end.
1
0 / 0 / 0
Регистрация: 15.02.2010
Сообщений: 10
15.02.2010, 21:33  [ТС] 3
Спасибо тебе из Бреста !!!!!!!!
0
15.02.2010, 21:33
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.02.2010, 21:33
Помогаю со студенческими работами здесь

Для целочисленной матрицы n*m сформировать одномерный массив, состоящий из количества элементов каждой строки кратных 5
Для целочисленной матрицы n*m сформировать одномерный массив, состоящий из количества элементов...

Сформировать одномерный массив из наибольших элементов каждой строки матрицы А
напишите пожалуйста программу на С++ Исходные данные: Дана матрица A(5*5) -3.8_0_5.3_4.5_0.5...

Сформировать одномерный массив из минимальных элементов каждой строки матрицы
Дано матрицу, состоящую из К строк и М столбцов. Сформировать одномерный массив из минимальных...

Сформировать одномерный массив, содержащий количество нулевых элементов каждой строки матрицы
Дана целочисленная матрица m x m . Определить количество отрицательных элементов в треугольнике...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru