информатика

01.12.2009, 15:39. **Показов** 1326. **Ответов** 2

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

Всем приветик!!!!!! помогите пожалуйста составить рисунок анимацию "Солнышко" и решить задачку задачка вот такая......Найти s=1+1/2+1/3+......+1/10 вот эта задачка. очень прошу помогите сама не могу. СПАСИБО ЗАРАНЕЕ!!!!!!

@БурундукЪ · 01.12.2009, 15:42

язык?

@yanyk1n · 01.12.2009, 16:17

На pascal'e выглядит так:

Pascal

uses crt;
var i,n:integer;
s:real;
 
begin
 clrscr;
 write('N -> ');
 readln(n);
 s:=0;
 for i:=1 to n do s:=s+1/i;
 writeln('S=',s:0:4);
 readln;
end.

Пусе4ка
		1
	информатика 01.12.2009, 15:39. Показов 1326. Ответов 2 Метки нет (Все метки) Всем приветик!!!!!! помогите пожалуйста составить рисунок анимацию "Солнышко" и решить задачку задачка вот такая......Найти s=1+1/2+1/3+......+1/10 вот эта задачка. очень прошу помогите сама не могу. СПАСИБО ЗАРАНЕЕ!!!!!!

@БурундукЪ 10065 / 2622 / 84 Регистрация: 17.02.2009 Сообщений: 10,364
	01.12.2009, 15:42	2
	язык? 0

	01.12.2009, 16:17

информатика

Решение