Даны числа: 6; 21; 217; 1653; 10045.

Используя MS Excel, вычисли среднее арифметическое данных чисел.

#include <iostream>
using namespace std;

int main(){
    int max,k,n,nod,p;
    int ar[1000];
    cin>>n;
    for(int i=0;i<n;i++){
            cin>>ar[i];
            }
    max=ar[0];
    for(int i=1;i<n;i++){
             if(ar[i]>max){
                max=ar[i];
                   k=1;
                    nod=1;}
                   }
    while(k!=max){
                  k++;
                  p=0;
                   for(int i=0;i<n;i++){
                           if(ar[i]%k==0){
                                          p++;}}
                           if(p==n){
                                    nod=k;}
                                    }
                   cout<<"NOD="<<nod;
                   cin.get();
                   cin.get();
                  return 0;
                  }

MS-DOS QBasic 1.0

CLS
a = 1: b = 4: h = .14
FOR x = a TO b STEP h
   f = COS(x ^ 2) + x ^ 3 / SQR(x + 1)
   PRINT x, f
NEXT x

Результат выполнения программы:
1             1.247409
1.14          1.280647
1.28          1.321321
1.42          1.409588
1.56          1.613091
1.7           2.021439
1.84          2.726152
1.98          3.78488
2.12          5.177972
2.26          6.778177
2.4           8.36335
2.54          9.695479
2.68          10.65637
2.82          11.37576
2.960001      12.24446
3.100001      13.72984
3.240001      16.04016
3.380001      18.86653
3.520001      21.49897
3.660001      23.38719
3.800001      24.74731
3.940001      26.5355