Void main()

{ char D[100], inf[60];

int c,i,L,K=0; ulong Lf=0;

printf("File = "); gets(inf);

FILE* f = fopen(inf,"rb");

errhalt(f==0,"Cannot open the File!");

printf("D = "); gets(D);

L=strlen(D);

// створити масив s, який буде працювати як стек

char* S= new char[L+1]; for (i=0;i<L+1;i++) S[i]=0;

for (;;) { c=fgetc(f); if (c==EOF) break; Lf++;

push(S,L,(char)c);

if (strcmp(S,D)==0) K++;

}

fclose(f);

delete[] S; // знищення динамічного масиву

printf("K = %d Lf = %lu \n",K,Lf);

}

Вправи

Вправа 1

Напишіть програму для знаходження найменшого загального кратного для двох заданих цілих чисел.

Вправа 2

Напишіть програму знаходження рангу чисельної матриці довільного порядку.

Вправа 3

Написати програму, яка для наданого N знаходить всі прості числа з інтервалу [0 .. N] та підраховує їх кількість.

Вправа 4

Надана множина цілих чисел, які складають відрізок [0, n-1] доля наданого n. Вивести на екран всі r-елементні підмножини.

Вправа 5

Надано файл, який містить у собі деякий текст. Програма повинна виконувати таку роботу: прочитати файл, відокремивши кожне слово, виконати лексикографічне упорядкування отриманого масиву слів і записати кожне слово у окремий рядок вихідного файлу.

Вправа 6

Напишіть функцію, яка виконує обернення квадратної числової матриці. Створіть програму, яка підраховує похибку обчислення зворотної матриці 25 порядку з елементами, які мають випадкові значення.

Вправа 7

Напишіть процедуру, яка розв’язує систему лінійних рівнянь довільного порядку. Створіть програму, яка підраховує найбільшу похибку розв’язку лінійної системи, отриманого за допомогою цієї процедури. Похибку обчислити для системи рівнянь 40 порядку з випадковими коефіцієнтами.

Вправа 8

Напишіть програму обчислення визначника матриці довільного порядку при умові, що вихідна матриця записана у файлі, ім’я якого надається.

Вправа 9

Надана послідовність цілих чисел. Знайти довжину найбільш довгої монотонно-зростаючої підпослідовності.