|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
19.11.2013, 14:18 | #1 |
Регистрация: 19.11.2013
Сообщений: 9
|
Перемножение матриц
Задание такое: Перемножить матрицы А(NxM), B(MxL), N<=10, L<=15, M<=20.
|
19.11.2013, 14:37 | #2 |
Пользователь
Регистрация: 07.06.2010
Сообщений: 89
|
любой поисковик выдаст уже готовую реализацию
|
19.11.2013, 14:38 | #3 |
Участник клуба
Регистрация: 05.11.2013
Сообщений: 1,601
|
|
19.11.2013, 16:43 | #4 |
Регистрация: 19.11.2013
Сообщений: 9
|
Спасибо большое! Еще один вопросик остался(
Clrscr , repeat, random(5)+1 - что делает эти команды? |
19.11.2013, 16:45 | #5 |
Участник клуба
Регистрация: 05.11.2013
Сообщений: 1,601
|
Очистка экрана
Цикл с постусловием Случайное число (целое) |
19.11.2013, 19:40 | #6 |
Регистрация: 19.11.2013
Сообщений: 9
|
Попробовал вывести первую матрицу , помогите пожалуйста!!
var A,B,C:array [n..m,m..l] of integer; n,m,i,j,q,r,k,h:integer; S:integer; begin repeat write('Vvedite kol-vo strok matrizs A:='); readln(n); if n<=10 do until n in [n..m] else writeln ('Ne ydovltv ycloviu n<=10'); repeat write('Vvedite kol-vo stolbzov matrizs A:='); readln(m); if m<=20 do until m in [n..m]; writeln('Matrits A:'); for i:=1 to n do begin for j:=1 to m do write(a[i,j]:2,' '); end; writeln; end; end. |
19.11.2013, 19:43 | #7 |
Участник клуба
Регистрация: 05.11.2013
Сообщений: 1,601
|
Не будет работать, ошибка в 1-й строке. Не определены n,m,l.
|
19.11.2013, 19:45 | #8 |
Регистрация: 19.11.2013
Сообщений: 9
|
как быть то тогда? что сделать? я не понимаю , как ещё задать..
|
19.11.2013, 19:48 | #9 |
Участник клуба
Регистрация: 05.11.2013
Сообщений: 1,601
|
Код:
|
19.11.2013, 19:52 | #10 |
Регистрация: 19.11.2013
Сообщений: 9
|
Так у меня же есть условия на размерности...как я могу задать их константами?
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перемножение матриц N * M и M * L | Pan_rust | Помощь студентам | 0 | 13.05.2011 10:14 |
перемножение матриц | laike | Помощь студентам | 3 | 12.06.2010 12:03 |
Перемножение матриц | jorjinho10 | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 11.05.2009 12:56 |
Перемножение матриц | Blad47 | Общие вопросы C/C++ | 1 | 02.02.2009 00:21 |
Перемножение матриц | Арина | Помощь студентам | 1 | 18.05.2007 19:21 |