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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 15.05.2016, 22:32   #1
Ralrahook
 
Регистрация: 15.05.2016
Сообщений: 4
По умолчанию Люди! Подскажите кто знает, как в delphi сделать консольную програму что строит треугольные масивы?

Вот пример треугольного массива 3 на 3:

Код:
var a:array of array of integer;
i:integer;
begin
SetLength(a,3);
for i:=0 to 2 do
SetLength(a[i], i+1);
end;


Но при запуске командная строка появляется на пару секунд и сразу закрывается.

Последний раз редактировалось Вадим Мошев; 15.05.2016 в 22:57.
Ralrahook вне форума Ответить с цитированием
Старый 15.05.2016, 22:47   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

в конце программы добавьте ReadLn;
чтобы приостановить закрытие консольного окна.

p.s. только у Вас программа на экран ничего не выводит (нет ни одного Write/WriteLn.
Что Вы на экране ожидаете увидеть? Чёрный квадрат Малевича?!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 15.05.2016, 22:53   #3
Ralrahook
 
Регистрация: 15.05.2016
Сообщений: 4
По умолчанию

Блин, я конечно извиняюсь за возможно тупой вопрос, но все же спрошу. А как сделать с WriteLn дабы в консоле результат выводился. Просто только начал знакомство с Delphi. А с масивами вообще как то туго)
Ralrahook вне форума Ответить с цитированием
Старый 15.05.2016, 23:11   #4
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,289
По умолчанию

Добавьте random, дополнительный цикл для заполнения и writeln.
Например:
Код:
for i := 1 to 10 do
begin
  for j := 1 to 10 do
  begin
    arr[i][j] := random(100);
    write(arr[i][j], ' ');
  end;
  writeln;
end;
Вам нужно верно задать границы внешнего и внутреннего цикла для вашего случая.
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 15.05.2016, 23:12   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
А как сделать с WriteLn дабы в консоле результат выводился.
всё зависит от того, что именно Вы хотите видеть в консоли.

Например, напишете
Код:
WriteLn('Massiv sozgan!');
получите на экране аналогичное сообщение!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 15.05.2016, 23:15   #6
Ralrahook
 
Регистрация: 15.05.2016
Сообщений: 4
По умолчанию

Я хочю видеть вывод построенной треугольной матрицы)
Ralrahook вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
хто знает как сделать програму? Сергей1-1-1 C++ Builder 1 28.05.2013 21:17
Подскажите если кто знает что это за компоненты edik Компоненты Delphi 7 02.12.2009 20:24
подскажите кто знает что это за файл и как его удалить Yury111 Безопасность, Шифрование 6 03.06.2009 14:54
Срочно, люди плиз, подскажите как сделать задачку по Delphi про Костяшки Kelik Помощь студентам 1 23.05.2009 19:50
Прошу помощи ! Люди отзовитесь пожалуйста кто знает что делать ! Jenya1982 JavaScript, Ajax 2 29.08.2008 23:17