#post-id: 4183-20-26
#original-date: 8.01.2012 Sun
#original-time: 8:26 PM
#original-day:  4183
#original-host: WinXP Home SP3 (Build 2600)

> #8206: Джентльмен удачи
> 
> В нашей школе можно получить начальное профессиональное 
> образование. Я хожу на курсы под названием «оператор ЭВМ», 
> и иногда мы решаем простенькие задачки по программированию.
> 
> Очередная задача: вводим двумерный массив три на три, состоящий 
> из цифр, а программа должна определить, симметричен ли 
> он относительно главной диагонали. Код написал, теоретически 
> должен работать, но что такое? Специально ввожу симметричный 
> массив — говорит, что симметричен. Ввожу рандомно с клавиатуры — 
> всё равно говорит, что симметричен! Пробую ещё два раза — 
> то же самое.
> 
> Подзываю друга помочь. Он смотрит логи и замечает, что все три 
> раза я действительно вводил абсолютно симметричный массив. Вот 
> и верь теперь в случайность…

http://ithappens.ru/story/8206

Это типа такой код?

> If ArrX(2, 0) = ArrX(0, 2) Then 
>   MsgBox "Симметричен!", vbInformation
> Else
>   MsgBox "Не симметричен!", vbInformation
> End If

Дьявольская задача!

Или "массив три на три", это в смысле "ArrX[3, 3]", тобишь от нуля 
до трёх?

Кстати, когда тестовая программа начинает оформляться 
в самостоятельную публичную утилиту, а первым делом пробеггаюсь 
по коду и удаляю восклицательные знаки в сообщениях.