Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/2: Рейтинг темы: голосов - 2, средняя оценка - 4.50
Диман74
0 / 0 / 1
Регистрация: 19.09.2012
Сообщений: 40
1

Замена последней строки матрицы нулями

12.11.2012, 16:29. Просмотров 451. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста найти ошибки. Если можно, то напишите исправленное тело программы.
Заранее спасибо!
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var m:array[1..5, 1..5] of integer;
    i,j: byte;
    n:integer;
write ('Введите элементы массива: ');
readln(n);
for i:=1 to 5 do
for j:=1 to 5 do
read(m[i,j]);
for i:=1 to 5 do begin
m[1,j]:=0;
end;
writeln('вывод изменённого массива');
for i:=1 to 5 do begin
for j:=1 to 5 do
write(m[i,j], ' ');
writeln;
end;
end.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.11.2012, 16:29
Ответы с готовыми решениями:

Замена отрицательных элементов матрицы нулями
Разработать программу для выполнения над матрицей А операций. 1) Замена отрицательных элементов...

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

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

Замена строки одной матрицы строкой другой матрицы
Прошу помощи в ещё одной задаче: Ввести квадратные матрицы X1N×M , X2N×M. Заменить первой строкой...

Найти минимальный элемент последней строки матрицы А. Сформировать вектор Z.
Помогите написать программу: Найти минимальный элемент последней строки матрицы А. Сформировать...

1
ermolay
3444 / 2382 / 2135
Регистрация: 04.12.2011
Сообщений: 3,965
12.11.2012, 16:56 2
Диман74, выкладывайте код в тему, так с ним проще разбираться
по теме:
1. вы забыли первый begin
2. for j:=1 to 5
3. Задание было изменить последнюю строку

вот рабочая программа:
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
const
  n=5;
var
  m: array[1..n, 1..n] of integer;
  i, j: byte;
  
begin
  writeln('Введите элементы массива: ');
  for i := 1 to n do
    for j := 1 to n do
    begin
      write('m[',i,',',j,']=');
      read(m[i, j]);
    end;
  for j := 1 to n do 
  begin
    m[n, j] := 0;
  end;
  writeln('Вывод изменённого массива');
  for i := 1 to n do 
  begin
    for j := 1 to n do
      write(m[i, j], ' ');
    writeln;
  end;
end.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.11.2012, 16:56

Расположить столбцы матрицы в порядке убывания элементов последней строки.
Помогите составить алгоритм program zadacha; uses crt; type matrix=array of integer;...

Двумерные массивы - Вывести номер первой последней строки, столбца матрицы
Помогите решить пожалуйста 2. Дана целочисленная матрица размера*M*x*N. Вывести номер ее первой...

Если все элементы какой-либо строки данной матрицы равны между собой, то все элементы такой строки замените нулями
Если все элементы какой-либо строки данной матрицы равны между собой, то все элементы такой строки...


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

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

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