С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
кодонафт
0 / 0 / 0
Регистрация: 08.11.2015
Сообщений: 29
1

Вывести двумерный массив в таблицу

08.11.2015, 22:56. Просмотров 811. Ответов 1
Метки нет (Все метки)

нужно вывести двумерный массив в таблицу , таблица должна быть нарисовано с помощу псевдографики
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.11.2015, 22:56
Ответы с готовыми решениями:

Двумерный массив. Вывести массив без i-той строки, и j-того столбца
Дан двумерный массив, а также целые числа i и j.Вывести массив без i-той...

Дан двумерный массив 5 на 5. Найти количество простых чисел в каждом столбце матрицы и вывести в одномерный массив
Из матрицы 5на5 вывести количество простых чисел в одномерный массив, в котором...

Вывести двумерный массив
подскажите где ошибка ? программа запускается но выводит одномерный массив...

Вывести двумерный массив в виде ромба
Здравствуйте, нужна помощь по выводу в виде Ромба. Текст программы скинул. Она...

Дан двумерный массив. Вывести на экран:
а) Все элементы второго столбца б) Все элементы пятой строки массива, начиная...

1
SuperKir
434 / 399 / 278
Регистрация: 10.03.2015
Сообщений: 1,699
Завершенные тесты: 1
09.11.2015, 02:07 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Это конечно говнокод, но для примера сойдет
Кликните здесь для просмотра всего текста

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
var a: array [1..10,1..10] of integer;
    i,j: Integer;
 
begin
Randomize;
for i:=1 to 10 do
for j:=1 to 10 do
a[i,j]:=random(10);
 
for i:=1 to 21 do
if i=1 then Write(#201)
else if i=21 then Write(#187)
else if odd(i) then Write(#203)
else Write(#205);
WriteLn;
for i:=1 to 10 do
begin
for j:=1 to 10 do
begin
if j<10 then Write(#186,a[i,j])
else Write(#186,a[i,j],#186);
end;
WriteLn;
end;
for i:=1 to 21 do
if i=1 then Write(#200)
else if i=21 then Write(#188)
else if odd(i) then Write(#202)
else Write(#205);
 
ReadLn;
end.

Название: q5h9ISs.png
Просмотров: 11

Размер: 4.2 Кб

Строки примерно по аналогии разделить можно. Коды глянуть в инете
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.11.2015, 02:07

Вывести двумерный массив определенным образом
как вывести массив? 123456 012345 001234 000123 000012 000001

Заполнить двумерный массив 6 на 6 и вывести его на экран
Заполнить двумерный массив 6 на 6 таким образом 1 0 0 0 0 1 0 2 ...

Двумерный массив. Ввести двумерный массив, найти сумму элементов каждого столбца
Ввести двумерный массив, найти сумму элементов каждого столбца.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru