Ви не увійшли. Будь ласка, увійдіть або зареєструйтесь.
Ласкаво просимо вас на україномовний форум з програмування, веб-дизайну, SEO та всього пов'язаного з інтернетом та комп'ютерами.
Будемо вдячні, якщо ви поділитись посиланням на Replace.org.ua на інших ресурсах.
Для того щоб створювати теми та надсилати повідомлення вам потрібно Зареєструватись.
Український форум програмістів → Pascal/Delphi → Delphi
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися
1.Обчислити суму перших n членів послідовності: у=10+100/1*2+1000/1*2*3+10000/1*2*3*4+....
Із чим саме у вас виникли труднощі? Може компілятор видає якісь помилки?
Може компілятор видає якісь помилки?
Може n занадто велике дано вчителем?
Так то можна було б
var s,fac,decs:Extended; n:LongInt;
begin decs:=10;
for n=1 to 100500 do begin
s:=s+decs/fac; decs:=decs*10; fac:=fac*n;
end;
writeln(s);
end.
Інкаше довга арифметика.
Арифметика довгих чисел. Частина 1. - "ПРОграммист", 2011, №12, с.12
Арифметика довгих чисел. Частина 2. - "ПРОграммист", 2011, №13, с.38
(src додатків до публікації безпосередньо в журналі, кнопа скріпки)
це явно якась прогресія, і скоріш за все можна вивести просту формулу, котра відразу видає потрібний результат.
Думав, що вольфрам альфа покаже мені таку формулу, але не показує 
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися
