Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.02.2014, 20:35   #1
DashGames
Новичок
Джуниор
 
Регистрация: 12.02.2014
Сообщений: 2
По умолчанию Заполнить матрицу случайными числами...

Вот часть кода,помогите написать пацаны..
Код:
begin
clrscr;
randomize;
writeln ('nax mat');
for i:=1 to y do
begin
for j:=1 to x do
begin
m[i,j] :=random(100);
write (m[i,j]:5);
end;
writeln;
end;
for i:=1 to y do
for j:=1 to x do
begin
k:=m[i,j];
m[i,j]:=m[y-i+1,j];
m[y-1+1,j]:=k;
end;
for i:=1 to y do
begin
for j:=1 to x do
write(m[i,j]:3);
writeln;
end;
end.
Изображения
Тип файла: jpg hqfIqNS8pmc.jpg (42.9 Кб, 136 просмотров)

Последний раз редактировалось Stilet; 12.02.2014 в 21:53.
DashGames вне форума Ответить с цитированием
Старый 12.02.2014, 20:41   #2
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

1) Заполнение случайными числами в коде присутствует
2) Размер матрицы советую задавать квадратный
3) Может быть, стоит запросить у пользователя размер матрицы
4) Данный код два раза отражает матрицу относительно горизонтальной оси (ну если убрать маленькую ошибочку в индексах и задать x и y)
5) Для выполнения данного задания нужен 1 цикл, который пройдет по главной диагонали (элементы m[i, i]) и отразит ее с побочной

UPD
Serge_Bliznykov, да, пора мне принимать на вооружение более жесткие формулировки (а то все время пишу "наверное", "лучше", "советую").
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

Последний раз редактировалось BDA; 12.02.2014 в 22:17.
BDA вне форума Ответить с цитированием
Старый 12.02.2014, 22:13   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от BDA Посмотреть сообщение
2) Размер матрицы советую задавать квадратный
позволю себе сделать акцент на данном пункте:
данный пункт носит не рекомендательный, А ОБЯЗАТЕЛЬНЫЙ характер!
(ибо понятия главной и побочной диагоналей определено только, исключительно, для квадратных матриц!)
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
задача на паскале: Матрицу размером 10Х10 заполнить случайными трехзначными числами. Отсортировать по строкам. докторлинус Помощь студентам 8 29.10.2013 09:45
получить прямоугольную матрицу A,заполнить натуральными случайными числами, записать наибольший общий делитель двух чисел! AntonKalinin01 Помощь студентам 0 26.05.2013 07:07
Заполнить массив из 10 елементов случайными числами SpENCeR C++ Builder 2 24.04.2012 20:51
Заполнить массив случайными числами. Fender92 Паскаль, Turbo Pascal, PascalABC.NET 4 19.03.2011 17:05
Заполнить массив случайными числами forumu Общие вопросы Delphi 13 03.12.2007 22:11