Лабораторная работа № 6 Тема: МАССИВЫ (ОДНОМЕРНЫЕ) Цель работы: освоение приемов объявления, обращения и использования массивов при решении задач. Типовые алгоритмы обработки одномерных массивов Рассмотрим некоторые типовые алг...
Лабораторная работа № 6 Тема: МАССИВЫ (ОДНОМЕРНЫЕ) Цель работы: освоение приемов объявления, обращения и использования массивов при решении задач. Типовые алгоритмы обработки одномерных массивов Рассмотрим некоторые типовые алгоритмы обработки массивов. Положим, что в декларативной части программы описаны следующие переменные: одномерные массивы А и В, переменные целого типа n, i и j и вспомогательные переменные типа элементов массива. 1. Суммирование элементов массива Реализация: s:=0; for i:=1 to n do s:=s+a[i]; writeln('Сумма элементов= ', s); скинь мне то что вводиnь в паcкаль
Гость
Ответ(ы) на вопрос:
Гостьconst
n=5;
Var
s,i: integer;
a:array[1..n] of integer;
Begin
a[1]:=1;
a[2]:=2;
a[3]:=3;
a[4]:=4;
a[5]:=5;
s:=0;
for i:=1 to n do
begin
s:=s+a[i];
writeln('Сумма элементов = ', s); {если тут, то вывод всех чисел на экран } end;
{если сюда вставить writeln('Сумма элементов = ', s); то тебе покажут тока ответ}
End.
Не нашли ответ?
Похожие вопросы