profile
Опубликовано 5 лет назад по предмету Информатика от pashastudent

Для любого целого k обозначим количество цифр в его десятичной записи  через N(k). Дано натуральное число m. Вычислить:

frac{N(1)}{1^{2}}+frac{N(2)}{2^{2}}+...+frac{N(m)}{m^{2}} 

Нужно написать код для паскаля!

  1. Ответ
    Ответ дан HRAshton
    var x: real;
        i, j, m: integer;
    function N(i: integer): integer;
    begin
         result := length(inttostr(i));
    end;
    begin
         readln(m);
         for i := 1 to m do
             x := x + N(i)/sqr(i);
         writeln(x);
    end.

    Я не совсем понял про "количество цифр в десятичной записи", но, если неправильно сделал, легко исправить, напишите мне =)
Самые новые вопросы