p>
For i: = 1 to n do
Read (f, A [i]);
Close (f)
end;
procedure Print;
var i: integer;
begin
For i: = 1 to n do
Write (A [i], '');
end;
procedure Solve (i, j: integer; Var t: integer);
var m: integer;
begin
If i> j then Writeln ('No')
else begin m: = (i + j) div 2;
Inc (b);
If A [m]
else If A [m]> X then Solve (i, m-1, t)
else Write (b);
end;
end;
begin
clrscr;
Init ('A: game.txt');
Print;
WriteLn;
ReadLn (x);
Solve (1, n, b);
readkey;
end.
Висновок.
У даному курсовому проекті ми розробили свій набір завдань і критерії, за якими даний набір можна класифікувати. Незважаючи на те, що розробляючи критерії класифікації, ми оперували з конкретним набором завдань, дана класифікація може бути застосовна до багатьох наборам завдань. Єдине невідповідність, яке може статися, це невідповідність за тематикою. Таким чином, дана класифікація досить універсальна і може мати широке практичне застосування. При виконанні даного курсового проекту основні труднощі припали на вибір літератури, так як по даній темі літератури небагато і її необхідно розглядати з точки зору методики викладання інформатики. У збірках завдань велике місце відведено задачах, мають сувору формулювання, яку змінити на ситуативну досить складно, так як завдання мають маленьку практичну значимість у житті.
Таким чином, цілі поставлені при виконанні даного курсового проекту досягнуті.
Література :
1) Б.М. Іванов Дискретна математика. Алгоритми і програми. Москва 2001р.
2) С.М. Окулов Програмування в алгоритмах. Москва 2002р.
3) Н.Вірт Алгоритми та структури даних. Москва В«МирВ» 1989р.
4) В.М. Кирюхін, А.В. Лапунов, С.М. Окулов Завдання з інформатики. Міжнародні олімпіади 1989-1996рр. Москва ABF 1996р.
5) С.М. Окулов, А.А. Пестов, О.А. Пестов Інформатика в завданнях. Кіров 1998р.
6) Н.Вірт Систематичне програмування. Під ред. Ю.М. Баяковского. Москва В«МирВ» 1977р.