Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Axsel
0 / 0 / 0
Регистрация: 23.06.2009
Сообщений: 3
#1

Двумерный массив - Pascal

23.06.2009, 21:27. Просмотров 389. Ответов 2
Метки нет (Все метки)

Уважаемые господа программисты.. я уже не знаю что делать!
Задача на двумерный массив, надо создать матрицу 5х5 в которой были случайно 1 и 0, когда в столбце или строке появлялись все 0, то выводилось сообщение что в строка или столбец №.. и №.. (если есть еще все 0 в строке или столбце) содержит все 0.
не могу зделать что бы выводилось сообщение когда все 0 в строке или столбце..
Спс зарание..
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.06.2009, 21:27
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Двумерный массив (Pascal):

Создать двумерный массив все четные элементы переписать в одномерный массив
создать двумерный массив все четные элементы переписать в одномерный массив

Двумерный массив.Получить массив x1,x2.xn по правилу xi=0. Найти также произведение всех элементов матрицы
Дана матрица n*n. Получить массив x1,x2...xn по правилу xi=0, если все элементы...

Вставить одномерный массив в двумерный массив так, чтобы второй столбец был отсортирован по убыванию
Помогите пожалуйста решить задачку: Вставить в качестве новой строки...

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

дан двумерный массив размером m*n. Вычислить количество нулевых элементов в каждой строке и результаты записать в массив размера M.
дан двумерный массив размером m*n. Вычислить количество нулевых элементов в...

Дан одномрный массив A(N). Выполнить сортировку методом перестановок.Преобразовать в двумерный массив: количество строк и столбцов запрашивается польз
Завтра аттетстация, помогите пожалуйста!! Нужно сделать программу в Паскале. ...

2
mamedovvms
2918 / 839 / 324
Регистрация: 30.04.2009
Сообщений: 2,633
24.06.2009, 06:22 #2
Лучший ответ Сообщение было отмечено Axsel как решение

Решение

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
32
33
34
uses crt;
var a:array[1..5,1..5] of integer;
      i,j,sum:integer;
begin
 clrscr;
 for i:=1 to 5 do
  begin
    for j:=1 to 5 do
      begin
        a[i,j]:=random(1);
        write(a[i,j]:3);
      end;
   writeln;
  end;
 
for i:=1 to 5 do
 begin
  sum:=0;
   for j:=1 to 5 do
    sum:=sum+a[j,i];
   if sum=0 then writeln(i,' -stolbec');
 end;
 
for i:=1 to 5 do
 begin
  sum:=0;
   for j:=1 to 5 do
    sum:=sum+a[i,j];
   if sum=0 then writeln(i,' -stroka');
 end;
 
readln;
 
end.
1
Axsel
0 / 0 / 0
Регистрация: 23.06.2009
Сообщений: 3
24.06.2009, 13:15  [ТС] #3
спс !
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.06.2009, 13:15
Привет! Вот еще темы с решениями:

Дан двумерный массив размером 10*10. Вывести на экран часть массива расположенную выше главной диагонали. Массив заполняется случайными числами.
Дан двумерный массив размером 10*10. Вывести на экран часть массива...

Преобразовать двумерный массив в одномерный массив
1. Сформировать двумерный целочисленный массив W(3*13) используя генератор...

Задан двумерный массив Х (Н x М),составить массив В
Задан двумерный массив Х (Н x М), составить массив В, являющийся разностью...

двумерный массив
Двумерный массив м на н. Найти максимальные и минимальные элементы, переставить...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru