Заглавная страница Избранные статьи Случайная статья Познавательные статьи Новые добавления Обратная связь FAQ Написать работу КАТЕГОРИИ: ТОП 10 на сайте Приготовление дезинфицирующих растворов различной концентрацииТехника нижней прямой подачи мяча. Франко-прусская война (причины и последствия) Организация работы процедурного кабинета Смысловое и механическое запоминание, их место и роль в усвоении знаний Коммуникативные барьеры и пути их преодоления Обработка изделий медицинского назначения многократного применения Образцы текста публицистического стиля Четыре типа изменения баланса Задачи с ответами для Всероссийской олимпиады по праву
Мы поможем в написании ваших работ! ЗНАЕТЕ ЛИ ВЫ?
Влияние общества на человека
Приготовление дезинфицирующих растворов различной концентрации Практические работы по географии для 6 класса Организация работы процедурного кабинета Изменения в неживой природе осенью Уборка процедурного кабинета Сольфеджио. Все правила по сольфеджио Балочные системы. Определение реакций опор и моментов защемления |
Одномерные массивы (последовательности).Теория Массив - это упорядоченный набор однотипных элементов, обозначаемых одним именем; доступ к элементу массива осуществляется по его номеру. Для записи элементов массива в память компьютера нужно выделить для их хранения необходимое количество ячеек памяти, которое определяется размером массива. В программе для каждого массива должны быть указаны его параметры: имя, размерность и размер. Бывают одномерные, двумерные и т.д. массивы. Это называется размерностью. Одномерные массивы (последовательности). A: 3,-4,0,3,-5,10,0 A[1]=3, A[3]=0, A[7]=0 I - номер элемента, A[I] - элемент массива, стоящий на I-ом месте Задача. Найти сумму элементов одномерного массива. Размер произвольный. Элементы вводятся с клавиатуры. Program summa; Vara: array[1..100] ofinteger; //описание массива, маскимум 100 элементов i, n: integer; //i - помогает ходить по элементам массива, n- сколько элементов в массиве пользователя s: integer; Begin Readln (n); //ввод количества элементов в массиве s:=0; //сумма вначале равна 0 Fori:=1 ton do begin//идем по элементам массива write ('введите число'); //получение инструкции readln (a[i]); //ввод самих элементов (в нашем случае -целые числа) s:=s+a[i];// подсчет суммы end; writeln('сумма элементов равна',s); //вывод результата End.
|
||
|
Последнее изменение этой страницы: 2024-06-27; просмотров: 53; Нарушение авторского права страницы; Мы поможем в написании вашей работы! infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 216.73.217.21 (0.005 с.) |