Напишите программу для вычисления суммы элементов массива

@Vladys95 · Регистрация: 30.10.2015

Author24 — интернет-сервис помощи студентам

1. Напишите программу для вычисления суммы элементов массива.

@ZX Spectrum-128 · 13.11.2015, 10:50

Pascal

1
2
3

sum:=0;
for i:=1 to n do
 sum:=sum+a[i];

@Vladys95 · 19.11.2015, 17:41 **[ТС]**

А можно с 0, поскольку все, что я знаю о масиве, это аррей;-) А как вводить, куда и что я не знаю.

@ZX Spectrum-128 · 19.11.2015, 18:33

Pascal

const
  n = 10;
 
var
  sum: real;
  i: integer;
  a: array [1..n] of real;
 
begin
  sum := 0;
  randomize;
  for i := 1 to n do
  begin
    a[i] := random * n;
    write(a[i]:8:2);
    sum := sum + a[i];
  end;
  writeln;
  writeln('Sum: ',sum:8:2);
end.

@Vladys95 · 20.11.2015, 17:10 **[ТС]**

Можно ли написать СЮДА програму, как можно проще, я не програмист, всего лишь будущий учитель, и функций, рандомов, и тому подобного не понимаю, мне же ее разобрать нужно, а не просто списать. Буду примного благодарен!

@ZX Spectrum-128 · 20.11.2015, 17:22

Vladys95, а вам что в сообщ. № 4 положили?

@Vladys95 · 20.11.2015, 17:37 **[ТС]**

А как-то без рандома можно ее оформить?

Добавлено через 13 минут
Вот о чем я вам:

Pascal

Program À3; 
 
Const 
   n = 10; 
Var 
   q : integer; 
   i: integer; 
   a: array [1..10] of integer; 
 
Begin 
  q := 0; 
  For i := 1 to 10 do 
    Begin 
      a[i]:=i; 
      Write(a[i],' '); 
      q := q + a[i]; 
    end; 
  WriteLn; 
  WriteLn('Sum: ',q); 
end.

А можно ли как-то сделать так, чтобы самому нужно было ввести элементы массива, а программа их посчитала?

@Vladys95 0 / 0 / 1 Регистрация: 30.10.2015 Сообщений: 66
		1
	Напишите программу для вычисления суммы элементов массива 13.11.2015, 09:32. Показов 4755. Ответов 6 Метки нет (Все метки) 1. Напишите программу для вычисления суммы элементов массива. 0

@Vladys95 0 / 0 / 1 Регистрация: 30.10.2015 Сообщений: 66
	19.11.2015, 17:41 [ТС]	3
	А можно с 0, поскольку все, что я знаю о масиве, это аррей;-) А как вводить, куда и что я не знаю. 0

@Vladys95 0 / 0 / 1 Регистрация: 30.10.2015 Сообщений: 66
	20.11.2015, 17:10 [ТС]	5
	Можно ли написать СЮДА програму, как можно проще, я не програмист, всего лишь будущий учитель, и функций, рандомов, и тому подобного не понимаю, мне же ее разобрать нужно, а не просто списать. Буду примного благодарен! 0

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	20.11.2015, 17:22	6
	Vladys95, а вам что в сообщ. № 4 положили? 0

	20.11.2015, 17:37