шаблоны сайт визитка joomla
Скачать шаблоны Joomla 3.5 бесплатно
Вы находитесь здесь:Главная»Учебные материалы»Pascal»Pascal. Сумма элементов в одномерном массиве.

Pascal. Сумма элементов в одномерном массиве.

Задача: Найти сумму элементов в одномерном массиве.

Решение: Сумма элементов массива находится путем прибавления элемента к прежнему значению переменной.

const max = 100;                            // опишем константу для размерноси массива

var a: array[1..max] of real;               // переменная а - массив вещественного типа 

n: integer;                                 // n - количество элементов массива

sum,  i: integer;                           // sum - сумма элементов массива

begin

write('Введите количество элементов массива: ');

readln(n);  

for i := 1 to n do

  begin

    write('a[',i,']=');                    

    readln(a[i]);                            //считывание элементов массива с клавиатуры 

  end;  

sum := 0; 

for i := 1 to n do sum := sum + a[i];       // суммируем элементы массива

writeln('Сумма элементов: ', sum:10:2);     // вывод значения суммы на экран

end.

Похожие материалы (по тегу)

Другие материалы в этой категории: « Pascal. Числовые типы данных. ООП в Pascal »

Новости о нас

Расписание занятий для каждой сформированной группы по робототехнике на 2017-2018 учебный год. Подробнее
Учебный год начался, и у нас очередная радостная новость для вас, педагоги! В этом году... Подробнее
Наши учащиеся выступили на августовской конференции педагогов! Подробнее
Хочешь учиться в Толтеке по выгодной цене? Приводи друзей и получай большие скидки!... Подробнее
19 августа в ТРЦ Сити Молл с блеском прошел РобоКвест! Героями квеста стали более сотни... Подробнее

Наши партнеры

 TZOyoOCZ8y0 logotip novy SF BashGU  utv logo  CityMoll  VolnoeDelo