Дана последовательность чисел 3^1 ; 3^2 ; 3^3 ; …;3^n , где n задаётся вводом. Найти сумму элементов последовательности, больших заданного числа a.

@Vana999 · Регистрация: 28.05.2011

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

Дана последовательность чисел 3^1 ; 3^2 ; 3^3 ; …;3^n , где n задаётся вводом.
Найти сумму элементов последовательности, больших заданного числа a. Показа-
тели степеней и элементы последовательности вывести в табличном виде.

@Drinker · 22.06.2011, 15:12

Pascal

uses crt;
 
var i,n : integer;
    x,s,a : real;
begin
read(n);
read(a);
s := 0;
for i := 1 to n do
begin
x := exp(ln(3)*i);
writeln('3 ^',i,' = ',x);
if (x > a) then s := s + x;
end;
write('Summa el-ov > ',a,' = ',s);
end.

@Vana999 0 / 0 / 0 Регистрация: 28.05.2011 Сообщений: 33
		1
	Дана последовательность чисел 3^1 ; 3^2 ; 3^3 ; …;3^n , где n задаётся вводом. Найти сумму элементов последовательности, больших заданного числа a. 22.06.2011, 14:56. Показов 2084. Ответов 1 Метки нет (Все метки) Дана последовательность чисел 3^1 ; 3^2 ; 3^3 ; …;3^n , где n задаётся вводом. Найти сумму элементов последовательности, больших заданного числа a. Показа- тели степеней и элементы последовательности вывести в табличном виде. 0

	22.06.2011, 15:12

Опции темы

Дана последовательность чисел 3^1 ; 3^2 ; 3^3 ; …;3^n , где n задаётся вводом. Найти сумму элементов последовательности, больших заданного числа a.

Решение