Задача. Для данного N составить алгоритм вычисления значения выражения: Бейсик REM Вычисление суммы INPUT "Введи N="; N K=0 FOR I=1 TO N K=SQR(2+SQR(K)) NEXT I PRINT "Сумма равна",K END Паскаль program zadacha (input, output); {вычисление суммы} var n,i:integer; k:real; begin writeln (‘введите натуральное число N’); readln(n); k:=0; for i:=1 to n do k:=sqrt(2+sqrt(k)); writeln (‘сумма=‘, k) end. Бейсик REM Вычисление суммы INPUT "Введи N="; N K=0 FOR I=1 TO N K=SQR(2+K) NEXT I PRINT "Сумма равна",K END Паскаль program zadacha (input, output); {вычисление суммы} var n,i:integer; k:real; begin writeln (‘введите натуральное число N’); readln(n); k:=0; for i:=1 to n do k:=sqrt(2+k); writeln (‘сумма=‘, k) end.
Задание

Задача.
Для данного N составить алгоритм вычисления значения выражения:

  • Бейсик
    REM Вычисление суммы
    INPUT "Введи N="; N
    K=0
    FOR I=1 TO N
    K=SQR\(2\+SQR\(K\))
    NEXT I
    PRINT "Сумма равна",K
    END
    Паскаль
    program zadacha \(input, output\);
    {вычисление суммы}
    var
    n,i:integer;
    k:real;
    begin
    writeln \(‘введите натуральное число N’\);
    readln\(n\);
    k:=0;
    for i:=1 to n do k:=sqrt\(2\+sqrt\(k\));
    writeln \(‘сумма=‘, k\)
    end.

  • Бейсик
    REM Вычисление суммы
    INPUT "Введи N="; N
    K=0
    FOR I=1 TO N
    K=SQR\(2\+K\)
    NEXT I
    PRINT "Сумма равна",K
    END
    Паскаль
    program zadacha \(input, output\);
    {вычисление суммы}
    var
    n,i:integer;
    k:real;
    begin
    writeln \(‘введите натуральное число N’\);
    readln\(n\);
    k:=0;
    for i:=1 to n do k:=sqrt\(2\+k\);
    writeln \(‘сумма=‘, k\)
    end.