, Робота в Паскаль Потрібно обчислити за допомогою циклу (1 / а) ^ 2 + (2 / а) ^ 2 + (3 / а) ^ 2 + (4 / а) ^ 2 (n / а) ^ 2n Значення а й n задаються з

, Робота в Паскаль Потрібно обчислити за допомогою циклу (1 / а) ^ 2 + (2 / а) ^ 2 + (3 / а) ^ 2 + (4 / а) ^ 2 (n / а) ^ 2n Значення а й n задаються з

  • По-моєму, неправильне умова:
    чи точно:
    (N / а) ^ 2n ??? а не
    (N / а) ^ 2?

    Тоді зміниться алгоритм, а поки:
    var i, j: integer;
    begin
    writeln (введіть a і n);
    readln (a; n);
    i: = 1;
    j: = 0;
    while (i<=n) do begin
    j: = j + (i / a) ^ 2;
    end;
    writeln (j);
    end.

    Перевірте синтаксис і на компіляторі - пишу по пам'яті

  • var a, n, i: integer; result: real;
    begin
    readln (a, n);
    result: = 0;
    for i = 0 to n do
    begin
    result: = result + ((i / a) * (i / a));

    end;
    writeln (result);
    end.

Понравилась статья? Поделись с друзьями:
Добавить комментарий

;-) :| :x :twisted: :smile: :shock: :sad: :roll: :razz: :oops: :o :mrgreen: :lol: :idea: :grin: :evil: :cry: :cool: :arrow: :???: :?: :!:

7 + 2 =