Найти сумму произведения чисел

@parad1se · Регистрация: 12.12.2010

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

Даны числа 5 10 15 20 25 найти сумму их произведения.

заранее благодарен

@TAVulator · 12.12.2010, 20:25

Сообщение от parad1se

сумму их произведения

это как?

@parad1se · 12.12.2010, 20:39 **[ТС]**

Сообщение от TAVulator

это как?

сам не понимаю,но она именно так и звучит

Добавлено через 1 минуту

Сообщение от parad1se

Даны числа 5 10 15 20 25 найти сумму их произведения.

заранее благодарен

произведений *
чутка ошибся

@TAVulator · 12.12.2010, 20:41

сумма: 5+10+15+20+25
произведение: 5*10*15*20*25
а сумма произведения...

Сообщение от parad1se

именно так и звучит

может именно так (не верно) записано со слов?

@VampirSS · 12.12.2010, 20:49

Pascal

uses crt;
var a:array[1..5] of integer;
    s, i, j:integer;
begin
clrscr;
a[1]:=5;
a[2]:=10;
a[3]:=15;
a[4]:=20;
a[5]:=25;
s:=0;
for i:=1 to 4 do
   for j:=i+1 to 5 do
      s:=s+a[i]*a[j]
writeln('S= ',s);
readln
end.

Это если дословно по заданию. То есть - 5*10+5*15+5*20+...+10*15+10*20+...+20*25

@SuPeR XaKer · 12.12.2010, 20:50

VampirSS
про массив ни чего не было сказано

@parad1se · 12.12.2010, 20:54 **[ТС]**

Сообщение от TAVulator

сумма: 5+10+15+20+25
произведение: 5*10*15*20*25
а сумма произведения...

может именно так (не верно) записано со слов?

может так:
Даны произведения 5*10*15*20*25 найти их сумму?

Добавлено через 2 минуты

Сообщение от VampirSS

Pascal

uses crt;
var a:array[1..5] of integer;
    s, i, j:integer;
begin
clrscr;
a[1]:=5;
a[2]:=10;
a[3]:=15;
a[4]:=20;
a[5]:=25;
s:=0;
for i:=1 to 4 do
   for j:=i+1 to 5 do
      s:=s+a[i]*a[j]
writeln('S= ',s);
readln
end.

Это если дословно по заданию. То есть - 5*10+5*15+5*20+...+10*15+10*20+...+20*25

это правильно???

@VampirSS · 12.12.2010, 22:05

SuPeR XaKer, но не писать же вручную всю эту сумму, хотя... для 5-ти чисел вручную было бы короче

Добавлено через 51 минуту

Pascal

uses crt;
var i, j, S:integer;
Begin
clrscr;
s:=0;
for i:=1 to 3 do
  for j:=i+1 to 5 do
    s:=s+i*j*sqr(5);
Writeln('summa ' , S);
readln
End.

Или вот так, если разложить сумму произведений по 5^2.

Найти сумму произведения чисел

Решение

Решение

@parad1se 0 / 0 / 0 Регистрация: 12.12.2010 Сообщений: 8
		1
	Найти сумму произведения чисел 12.12.2010, 20:21. Показов 3932. Ответов 7 Метки нет (Все метки) Даны числа 5 10 15 20 25 найти сумму их произведения. заранее благодарен 0

@TAVulator ⚽ 4190 / 1291 / 237 Регистрация: 27.07.2009 Сообщений: 3,962
	12.12.2010, 20:25	2
	Сообщение от parad1se сумму их произведения это как? 0

@parad1se 0 / 0 / 0 Регистрация: 12.12.2010 Сообщений: 8
	12.12.2010, 20:39 [ТС]	3
	Сообщение от TAVulator это как? сам не понимаю,но она именно так и звучит Добавлено через 1 минуту Сообщение от parad1se Даны числа 5 10 15 20 25 найти сумму их произведения. заранее благодарен произведений * чутка ошибся 0

@TAVulator ⚽ 4190 / 1291 / 237 Регистрация: 27.07.2009 Сообщений: 3,962
	12.12.2010, 20:41	4
	сумма: 5+10+15+20+25 произведение: 510152025 а сумма произведения... Сообщение от parad1se именно так и звучит может именно так (не верно) записано со слов? 0

@SuPeR XaKer 2857 / 1986 / 788 Регистрация: 23.09.2010 Сообщений: 4,877
	12.12.2010, 20:50	6
	VampirSS про массив ни чего не было сказано 0

	12.12.2010, 22:05