Вычислить значение выражения

@mol · Регистрация: 10.11.2012

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

Даны натуральные числа n и k. Вычислить:

@galaid · 10.11.2012, 21:29

Создаешь цикл по n. Например:

Pascal

for i:=n downto 1 do
begin
...
тело цикла
...
end;

В теле цикла пишешь что-то типо этого:

Pascal

1	rez:=sqrt(k*i)+rez;

Попробуй, должно получиться.

@mol · 10.11.2012, 22:54 **[ТС]**

что то я не совсем понял, а можно поподробней?

@galaid · 10.11.2012, 23:00

mol, так пойдет?

Pascal

var
   k,n,i:integer;
   r:real;
begin
     write('k= ');
     readln(k);
     write('n= ');
     readln(n);
     r:=0;
     for i:=n downto 1 do
         begin
              r:=sqrt(k*i)+r;
         end;
     r:=sqrt(r);
     writeln(r);
end.

@mol 0 / 0 / 0 Регистрация: 10.11.2012 Сообщений: 39
		1
	Вычислить значение выражения 10.11.2012, 18:59. Показов 1281. Ответов 3 Метки нет (Все метки) Даны натуральные числа n и k. Вычислить: Миниатюры 0

@mol 0 / 0 / 0 Регистрация: 10.11.2012 Сообщений: 39
	10.11.2012, 22:54 [ТС]	3
	что то я не совсем понял, а можно поподробней? 0

	10.11.2012, 23:00

Вычислить значение выражения

Решение