|
Вопрос # 4 413/ вопрос открыт / |
|
Здравствуйте, эксперты!
Помогите пожалуйста вывести двухмерный массив (8х8) в мемополе для его просмотра.
С уважением
Бакшаев Г.С.
 |
Вопрос задал: Бакшаев Глеб Степанович (статус: Посетитель)
Вопрос отправлен: 11 июля 2010, 17:40
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Ну вот, типа, как-то так:
var
S: string;
X: array[0..7, 0..7] of Integer;
begin
for i:= 0 to 7 do
begin
S:= '';
for j:= 0 to 7 do
S:= S + ' ' + IntToStr(X[i, j]);
Memo1.Lines.Add(S);
end
end;
Это только пример, имей в виду!
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 11 июля 2010, 17:48
|
Мини-форум вопроса
Всего сообщений: 6; последнее сообщение — 18 июля 2010, 23:50; участников в обсуждении: 3.
|
Егор (статус: 10-ый класс), 11 июля 2010, 17:49 [#1]:
var
a : array [1..8, 1..8] of integer;
i, j : integer;
s : string;
...
memo1.clear;
for i:=1 to 8 do
begin
s := IntToStr(a[i,1]);
for j:=2 to 8 do
s := s + ' ' + IntToStr(a[i,j]);
memo1.Lines.Add(s);
end
...
так, что ли?
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
Егор (статус: 10-ый класс), 11 июля 2010, 17:52 [#2]:
min@y™:
гыыыыыы, у дураков мысли сходятся )))))))))))
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
min@y™ (статус: Доктор наук), 11 июля 2010, 18:00 [#3]:
Цитата (Егор):
гыыыыыы, у дураков мысли сходятся  )))))))))))
Правильно. А у нас - расходятся. Найди 10 отличий.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
Егор (статус: 10-ый класс), 11 июля 2010, 18:07 [#4]:
min@y™, какой же ты скучный
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
min@y™ (статус: Доктор наук), 11 июля 2010, 18:10 [#5]:
Цитата (Егор):
какой же ты скучный
Нихт ферштейн... Почему скучный-то?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
Бакшаев Глеб Степанович (статус: Посетитель), 18 июля 2010, 23:50 [#6]:
Добрый вечер всем!
Спасибо за помощь, буду пробовать.
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|