Загадайте мне задачку, пожалуйста

[Аватар]

Создать симметричную матрицу.
Причем не изменяя исходную

Не понял. Ну вот симметричная матрица
1 2 3
2 0 5
3 5 7
Что такое исходная?

ADD

Если матрицу Ромахи считать исходной, то из неё можно получить симметричную например так
1 2 3
2 5 6
3 6 9
Это имеется в виду?

[Stilet]

Какая матрица будет симметрична данной?

Вот такая:

3 2 1 1 2 3
6 5 4 4 5 6
9 8 7 7 8 9

Короче: Отзеркалить матрицу.

[Аватар]

Ясно. Но только это не симметричная матрица

[Poma][a]

Ясно. Но только это не симметричная матрица

Соглашусь.. понятие симметричной матрицы определено лишь для квадратной матрицы (т.к. диагональ определена лишь для квадратной матрицы )

[Кольша]

Раз пошла тема про задачи..вспомнилась задача с группы в вк.
Сосчитать до 1000 без циклов(while,for,goto,repeat...) и условий(if then else, return a=b,..).

[Poma][a]

А задача хороша..
Прошу как-нить скрывать ответ (и желательно не цветом, т.к. уведомления по почте испортят всю малину)..

без циклов(while,for,goto,repeat...)

Решение существует для всех паскалей?

условий(if then else, return a=b,..).

Ord можно?

И будет ли ответом

Write(1, ' ', 2,' ', 3, ' ', ...)

?

[Poma][a]

Вот так?
тыц

[Stilet]

это не симметричная матрица

Я имел ввиду сделать ее зеркальное отображение, превратив матрицу симметричный массив.

[Кольша]

Poma][a, альтернативное решение.
Вообще хоть как главное соблюдать правила.
Ord??
Вот мое решение:
решение

[Chinovnik]

Сообщение от Кольша

Poma][a, альтернативное решение.
Вообще хоть как главное соблюдать правила.
Ord??
Вот мое решение:
решение

Точно можно и рекурсией решить. Только мне кажется, что такой вариант зависнет - нет условия остановки процедуры а. И там еще деление на ноль появляется, незнаю почему, может мой Pascal глючит?