Необходимо решить следующую предметную и написать программу на языке паскаль. для любого целого k обозначим количество цифр в его десятичной записи ц(k). например: ц(1)=1, ц(9)=1, ц(10)=2. дано натуральное число n. вычислить: ( ц(1)/1 ) + ( ц(2)/2^2 ) + +( ц(n)/n^2 )
mariyalesnyak
3
03.10.2019 05:50
1
Другие вопросы по теме Информатика
nikolay946
23.07.2019 01:00
aidana013
07.10.2019 13:02
Eleonora20061
22.07.2019 23:30
illay0409
22.07.2019 23:30
FarzEtdk
22.07.2019 23:30
odin2323
22.07.2019 23:30
20031408
24.11.2020 12:20
Женьочки
24.11.2020 12:20
ЭмилиСтоун11
24.11.2020 12:20
Популярные вопросы
- Исправьте ошибку . если она есть there are a lot of in the soup...
1 - Вставьте глагол в нужной форме, чтобы образовать условные предложения...
2 - Два автобуси їхали з однаковою швидкістю. перший автобус був у...
1 - Являются ли взаимно простыми числа: а)12 25; б)40 39; в)55 42;...
3 - Влаголюбивое растение это- а) эвкалипт б)перекати-поле в)саксаул...
3 - Опорно-двигательные системы всех многоклеточных животных...
2 - 99 ! напишите сочинение о том как вы выполняете какую либо работу...
1 - Определи лицо число и спряжение : рассказывает сказку...
1 - Полный синтаксический разбор этого предложения: «несколько путешествий...
1 - 0,4*17*2,5= решите удобным это )...
3
program crash;
var n, k: integer;
r: real;
begin
write('n = ');
readln(n);
k := 0;
r := 0;
while n > 0 do
begin
k := k + 1;
r := r + (n mod 10) / (k * k);
n := n div 10
end;
writeln('r = ', r:0:14);
readln
end.