Вычисление конечных сумм и произведений

@Айым Ермековна · Регистрация: 10.03.2018

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

Как вычислить сумму и произведение x=sum(от k=1 до 18)f(в индексе i=18)(k), y=П(от k=1 до 18)f(в индексе 19)(k). Функция: f(x,y)=z=5*x-2*y. Вычислить значение выражения z и вывести x,y,z.

@ZX Spectrum-128 · 18.03.2018, 08:02

Айым Ермековна, формулы наберите, пожалуйста, в редакторе формул.

@Айым Ермековна · 18.03.2018, 08:58 **[ТС]**

ZX Spectrum-128б б, можно так? i=13

@Puporev · 18.03.2018, 10:05

Не очень понятно написано, понял так.

Delphi

const i=13;
function f(x,y:integer):integer;
begin
f:=5*x-2*y;
end;
var k,x,y:integer;
begin
x:=0;
for k:=1 to i+5 do
x:=x+f(i+5,k);
//вывод х
y:=1;
for k:=1 to i+5 do
y:=y*f(i+6,k);
//вывод y
end.

@Айым Ермековна 0 / 0 / 0 Регистрация: 10.03.2018 Сообщений: 84
		1
	Вычисление конечных сумм и произведений 17.03.2018, 22:17. Показов 1207. Ответов 3 Метки нет (Все метки) Как вычислить сумму и произведение x=sum(от k=1 до 18)f(в индексе i=18)(k), y=П(от k=1 до 18)f(в индексе 19)(k). Функция: f(x,y)=z=5x-2y. Вычислить значение выражения z и вывести x,y,z. 0

@ZX Spectrum-128 6810 / 4567 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	18.03.2018, 08:02	2
	Айым Ермековна, формулы наберите, пожалуйста, в редакторе формул. 0

@Айым Ермековна 0 / 0 / 0 Регистрация: 10.03.2018 Сообщений: 84
	18.03.2018, 08:58 [ТС]	3
	ZX Spectrum-128б б, можно так? i=13 Миниатюры 0

	18.03.2018, 10:05