Вопрос по информатике:
Дан массив целых чисел размерностью n (n=16), найти сумму первых пяти элементов массива
Сделать в Паскале
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 26.07.2015 15:45
- Информатика
- remove_red_eye 9025
- thumb_up 27
Ответы и объяснения 2
program mass;
const n = 16;
var A: array [1..n] of integer;
i, sum : integer;
begin
writeln ('Vash massiv: ');
for i:=0 to n do A[i]:= random(10);
for i:=0 to n do write(A[i], ' ');
sum:=0;
for i:=0 to 5 do sum:=sum + a[i];
writeln();
writeln('s = ', sum);
end.
- 27.07.2015 14:16
- thumb_up 23
begin
var a:=ArrRandom(16,-99,99); a.Println;
Writeln('Сумма первых 5 значений ',a[:5].Sum)
end.
- 28.07.2015 14:37
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.