Помагите пожулуста очень нужн
да завтра

Блок-схема - в прилагаемом файле. Программа:
const n=20;
var a:array[1..20] of integer;
i,k2,k3,k4,k5:integer;
begin
Randomize;
writeln('Оценки:');
for i:=1 to n do begin
 a[i]:=random(4)+2;
 write(a[i],' ');
 end;
writeln;
k2:=0;k3:=0;k4:=0;k5:=0;
for i:=1 to n do
 case a[i] of
  2: k2:=k2+1;
  3: k3:=k3+1;
  4: k4:=k4+1;
  5: k5:=k5+1;
 end;
writeln('Двоек: ',k2);
writeln('Троек: ',k3);
writeln('Четверок: ',k4);
writeln('Пятёрок: ',k5);
end.

Пример:
Оценки:
3 5 3 2 5 3 2 5 3 4 4 5 2 3 3 4 4 2 2 5 
Двоек: 5
Троек: 6
Четверок: 4
Пятёрок: 5

В приложении программы в файлах
1.
#include <iostream>
using namespace std;
int main()
{
    setlocale(LC_ALL,"Russian" );
    int k, n, sum = 0;
    cout << "Введите K: ";
    cin >> k;
    cout << "Введите N: ";
    cin >> n;

    for(int i = k ; i <= n; i++) {
        sum = sum + i;
    }

    cout << "Сумма чисел от " << k << " до " << n << " равна " << sum << endl;
    return 0;
}

2.
#include <iostream>
using namespace std;
int main()
{
    setlocale( LC_ALL,"Russian" );
    int k, n;
    cout << "Введите K: ";
    cin >> k;
    cout << "Введите N: ";
    cin >> n;

    for(int i = 1 ; i <= n; i++) {
        cout << k << endl;
    }
    return 0;
}

3.
#include <iostream>
using namespace std;
int main()
{
    for(int i = 1; i < 30; i++){
        if (!(i % 2 == 0)) {
            cout << i << endl;
        }
    }
    return 0;
}

4.
#include <iostream>
using namespace std;
int main()
{
    for(int i = 1; i <= 10; i++) {
        cout << i << " " << i*i << endl;
    }
    return 0;
}