Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Этапы решения задачи. 1. Определим переменные, которые будем использовать в программе: имя массива A, размер массива N, индекс строки i






1. Определим переменные, которые будем использовать в программе: имя массива A, размер массива N, индекс строки i, индекс столбца j, cуммы элементов каждой строки Si.

2. Для обращения к элементам массива потребуется использовать вложенные операторы цикла for...

3. Составим блок-схему алгоритма и программу формирования одномерного массива из сумм элементов каждой строки двумерного массива.

 
 

 

 

Program massiv_21; Var a: array[1..50, 1..50] of integer; s: array[1..50] of integer; i, j, n, m: integer; Begin writeln (' количество строк n='); readln (n); Write(‘количество столбцов m='’); Readln(m); writeln ('введите элементы массива'); For i: =1 to n do For j: =1 to m do begin write(‘a[‘, i, ’, ’, j, ’)=’); readln (a[i, j]); end; For i: =1 to n do begin S[i]: =0; {подготовка переменной для суммы } For j: =1 to m do S[i]: =S[i]+a[i, j]; {сумма элементов каждой строки } end; For i: =1 to n do writeln (‘s[‘, i, ’ ]=’, s[ i ]); {вывод массива } End.    

Задание 2

В двумерном массиве, состоящем из N целых чисел, найти количество отрицательных элементов в каждом столбце. Из полученных значений сформировать одномерный массив.


Поделиться с друзьями:

mylektsii.su - Мои Лекции - 2015-2024 год. (0.006 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал