Сделать в Pascal ABC. Отыскать сумму первых 5-ти элементов одномерного массива

Сделать в Pascal ABC. Найти сумму первых 5-ти частей одномерного массива

Задать свой вопрос
1 ответ
Program element_massiva5 
var 
Sum, i : integer; 
a : array [1..15] of integer;  
begin 
Sum := 0; 
 writeln('введите 15 чисел массива'); 
for i:=1 to 15 do 
 begin  
 readln(a[i]); 
 end
Sum:=a[1]+a[2]+a[3]+a[4]+a[5]; 
 Writeln(' Ответ: ',Sum); 
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт