Надо сформировать двумерный массив, у которого значения элементов равны 1, если сумма индексов этого элемента четная, и равны 0, если сумма индексов нечётная
Категория: Basic
2011-12-07 16:01:33
code: #basic
INPUT "vvedite kol-vo strok ", m INPUT "vvedite kol-vo stolbcov ", n DIM a(m, n) FOR i = 1 TO m FOR j = 1 TO n a(i, j) = 1-(i + j) MOD 2 NEXT NEXT FOR i = 1 TO m FOR j = 1 TO n PRINT a(i, j); NEXT PRINT NEXT
автор: кот Бегемот
Поделиться: