71051

Обработка двумерных массивов

Лабораторная работа

Информатика, кибернетика и программирование

Задание к лабораторной работе: Дана действительная квадратная матрица А размера n  n. Вычислить суммы элементов двух главных диагоналей матрицы. Схема алгоритма. Программа на языке Basic Расчет сумм элементов двух главных диагоналей матрицы.

Русский

2014-11-01

323.5 KB

1 чел.

Федеральное агентство связи

Сибирский Государственный Университет Телекоммуникаций и Информатики

Межрегиональный центр переподготовки специалистов

Лабораторная работа №5

По дисциплине: Информатика

                                  

Выполнил:

Группа:

Вариант: 10

    

Проверил: ___________________

Новосибирск, 2014 г

Лабораторная работа № 5

Обработка двумерных массивов

Задание к лабораторной работе:

Дана действительная квадратная матрица А размера n  n. Вычислить суммы  элементов двух главных диагоналей матрицы.

Схема алгоритма.

Программа на языке Basic

 

10 'Расчет сумм  элементов двух главных диагоналей матрицы.

20 CLS

30 INPUT “Введите размер матрицы n=», n

40 DIM a(n,n)

50 PRINT “Для генерации массива из случайных чисел нажмите 1“

60 PRINT “Для ввода собственных значений нажмите любую другую цифру“

70 INPUT k

80 IF k=1 THEN 90 ELSE170

90 ‘Создание массива из случайных чисел

100 FOR i=1 TO n STEP 1

110 FOR j=1 TO n STEP 1

120 RANDOMIZE TIMER

130 a(i,j) = INT(RND * 100)

140 NEXT j

150 NEXT i

160 GOTO 240

170 ‘Создание массива вручную

180 FOR i=1 TO n STEP 1

190 FOR j=1 TO n STEP 1

200 PRINT ”Введите a(”; i; j; ”)”

210 INPUT a(i, j)

220 NEXT j

230 NEXT i

240 ‘Вывод сформированного массива

250 FOR i=1 TO n STEP 1

260 FOR j=1 TO n STEP 1

270 PRINT a(i, j);

280 NEXT j

290 PRINT

300 NEXT i

310 s1=0: s2=0

320 ‘Расчет суммы чисел первой диагонали

330 FOR i=1 TO n STEP 1

340 FOR j=1 TO n STEP 1

350 IF i = j THEN 360 ELSE 370

360 s1 = s1 + a(i, j)

370 NEXT j

380 NEXT i

390 ‘Расчет суммы чисел второй диагонали

400 FOR i=1 TO n STEP 1

410 FOR j=1 TO n STEP 1

420 IF j = n – i +1 THEN 430 ELSE 440

430 NEXT j

440 NEXT i

450 PRINT

460 PRINT “Сумма чисел первой диагонали равна», s1

470 PRINT “Сумма чисел второй диагонали равна», s2

480 END

Результаты выполнения программы


 

А также другие работы, которые могут Вас заинтересовать

47270. Автоматизация рабочего места специалиста отдела контроля выбросов загрязняющих веществ в атмосферу на предприятии (на примере ЗАО «Каучук» г. Стерлитамак) 3.53 MB
  Основы проектирования базы данных. Проектирование баз данных. Структура всего отчета на основе исходных данных. Для оперативного управления информацией необходимо создание базы данных позволяющей вести точный полный учет заказчиков исполнителей сырья и материалов объема выполненных работ.
47271. Разработка системы электроснабжения новой застройки района крупного города от сети 110 кВ 3.06 MB
  Основные показатели системы электроснабжения города определяются местными условиями: размерами города, наличием источников питания, характеристиками потребителей и т.д. Для принятия той или иной системы построения электрической сети необходимо учитывать мощность и число потребителей,
47272. История государства и права зарубежных стран 299.01 KB
  История государства и права зарубежных стран является историко- правовой наукой по своему научному содержанию и задачам она одновременно относится и к исторической науке и к правоведению. В зависимости от того на познание какого социального объекта направлено ее внимание
47273. Разработка системы электроснабжения микрорайона города 219.04 KB
  Для разработки системы электроснабжения микрорайона города были предоставлены данные о количестве, типе и расположении зданий существующей и перспективной застройки микрорайона.
47274. Определение номинальной мощности трансформаторных подстанций (ТП) 20/0,4 кВ и расстановка ТП на территории района 3.78 MB
  Источником пищеприготовления электроэнергии для электроснабжения заданного района является теплоэлектроцентраль (ТЭЦ), расположенная на расстоянии от района. Номинально напряжение источника питания составляет...
47275. Организация системы видеонаблюдения в главном корпусе Башкирского ГАУ 2.44 MB
  Система видеонаблюдения на базе видеорегистратора. Используемые в данной системе видеонаблюдения камеры являются аналоговыми. Данный тип камер преобразует видеосигнал в формат, который может быть получен телевизионным или другим приемником, например охранным монитором. В то же время система видеонаблюдения является цифровой, так как полученные данные сохраняются на цифровой носитель.
47277. Устройство рулевого управления Зил 5301 76.44 KB
  Для надежности соединений деталей рулевого привода пробки наконечников продольной рулевой тяги автомобиль ЗИЛ5301 и гайки крепления поворотных рычагов и шаровых пальцев зашплинтованы.Все шарнирные соединения рулевого привода для уменьшения износа деталей смазываются через масленки и имеют защитные приспособления от попадания грязи и вытекания смазки. При повороте колёс или наезде на препятствие детали рулевого привода перемещаются друг относительно друга как в вертикальной так и в горизонтальной плоскостях.