|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
31.10.2007, 15:52 | #1 |
C# developer
Форумчанин
Регистрация: 03.10.2007
Сообщений: 393
|
проблема с массивом
у меня вопрос в программе
прога должна создать массив и вывесте максимальное и мнимальное значение массива. вот мой код но выводит он совсем други значения Код:
I like WPF
|
31.10.2007, 16:05 | #2 | ||
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
Цитата:
Цитата:
Life is too short, play more...
Как правильно задавать вопросы Последний раз редактировалось Alex21; 31.10.2007 в 16:15. |
||
31.10.2007, 16:18 | #3 |
Пользователь
Регистрация: 25.10.2007
Сообщений: 41
|
Вот так должно работать.. Только Uses обратно поправь.
program Project1; {$APPTYPE CONSOLE} uses SysUtils; const n= 5; type matr = array[1..n,1..n] of integer; var a:matr; i:integer; min:integer; j:integer; max:integer; begin randomize; for i:= 1 to n do begin for j:= 1 to n do begin a[i,j]:=random(100); write(a[i,j],' '); end; writeln; end; readln; max:=a[1,1]; min:=a[1,1]; for i:= 1 to n do for j:= 1 to n do begin if a[i,j]> max then max:=a[i,j]; if a[i,j]<min then min:=a[i,j]; end; write(min,' '); writeLN(max); readln; end. |
31.10.2007, 16:22 | #4 |
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
под консолью правил
Код:
Life is too short, play more...
Как правильно задавать вопросы |
31.10.2007, 17:11 | #5 |
C# developer
Форумчанин
Регистрация: 03.10.2007
Сообщений: 393
|
вам всем большое!!!!
I like WPF
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
проблема с массивом | kommunist | Паскаль, Turbo Pascal, PascalABC.NET | 7 | 27.05.2010 19:00 |
Проблема с динамическим массивом | dee_lv | Помощь студентам | 7 | 09.06.2008 16:58 |
проблема с массивом | kommunist | Помощь студентам | 6 | 14.11.2007 18:36 |
проблема с динамическим массивом | kommunist | Помощь студентам | 6 | 11.11.2007 21:18 |
проблема с массивом | Lonix | Общие вопросы Delphi | 2 | 06.11.2007 23:56 |