Вопрос по информатике:
1. Найти s=1+1/2 +1/3 +1/4 +…+1/n , n- вводится с клавиатуры 2. Найти сумму N чисел, вводимых с клавиатуры.
- 14.01.2015 13:08
- Информатика
- remove_red_eye 10172
- thumb_up 21
Ответы и объяснения 1
1.
var n,i:integer; s:real;
begin
write('N='); readln(n);
s:=0;
for i:=1 to n do s:=s+1/i;
writeln('S=',s:7:3);
end.
2.
var n,i,a,s:integer;
begin
write('N='); readln(n);
s:=0;
for i:=1 to n do
begin
write('a=');
readln(a);
s:=s+a;
end;
writeln('S=',s);
end.
- 15.01.2015 12:54
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.