TURBO PASCAL:Учебное пособие. Терёхин В.В. - 58 стр.

                                            n
                                                    2k
1. Дано натуральное число n. Вычислить     ∑ (k + 1)(k
                                           k =1
                                                         2
                                                             + k)
                                                                    .

2. Дано натуральное число n. Вычислить
            n
                      k!+ k n − k +1
           ∑
           k =1
                              k        .
                  7 k k + C (i + 2)
                            i =0
3. Найти значения полинома у = 8m + 4.3m2 -1,46m3 для
1.0 ≤ m ≤ 5.9 с шагом hm = 0.1 .
4. Еще один алгоритм Евклида для нахождения НОД неотрица-
тельных целых чисел основан на следующих свойствах этой
величины. Пусть m и n - одновременно не равные нулю целые
неотрицательные числа и пусть m ≥ n. Тогда, если n=0, то
НОД(m,n)=m, а если n ≠ 0, то для чисел n, m и r , где r - остаток
от деления m на n, выполняется равенство НОД(m,n)=НОД(n,r).
Например, НОД(15,6)=НОД(6,3)=НОД(3, 0)=3.
       Даны натуральные числа n, m. Используя алгоритм Ев-
лида, найти их наибольший общий делитель.

5. Вычислить y = 3 + 6 + ... + 96 + 99 .
6. Дано   действительное число х ≠ 0 . Вычислить функ-
             3   5     7
цию y = x − 3 + 5 − 7 + ... . Вычисления прекратить, когда
             x   x    x
очередной член будет по абсолютному значению меньше 1 0-6 .
7. Дано натуральное число n. Вычислить сумму и произведение
его цифр.
8. Дано натуральное число n >2. Вывести на экран все простые
числа из диапазона [2,n].

          18 Массивы
      Массивом называют последовательность однотип-
ных данных, имеющих один идентификатор - имя и разли-
чающихся по номерам (индексам) в этой последовательно-
                                                                    58