16.02.2011, 23:58 | #1 (permalink) |
Новичок
Регистрация: 16.02.2011
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Двумерный массив
Текст задачи: В двумерном массиве перед последней строкой вставить строку с положительной суммой элементов. если таких строк будет несколко, то можно было бы выбрать любую из них. cls input "stroki"; x input "stolbiki";y dim a(x,y) randomize timer for i=1 to x for j=1 to y a(x,y)= int(rnd*200-100)+1 print a(x,y); next j next i кусок вашего кода p=0 for i=1 to x s=0 for j=1 to y s=s+a(i,j) next j if s>=0 then p=i next i if p>=0 then for j=1 to y a(x+1,j)=a(x,j) [при запуске пррограммы выдаёт ошибку Subskript out of range и ивыделяется эта строка] a(x-1,j)=a(p,j) next j end if for i=1 to x for j=1 to y print a(x,y); next j next i end |
16.02.2011, 23:58 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Могу вам подсказать, что в данных обсуждениях возможно содержаться нужные вам ответы В Паскале двумерный массив Двумерный массив Двумерный массив. Задача Фортран, двумерный массив Паскаль, двумерный массив |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|