Курсовая работа: Дослідження чисельних методів інтегрування

writeln ('I=', delta[1][1]:5:14);

write ('Чебишева:');

gotoxy (13, wherey);

write ('I=', delta[2][3]:5:14);

gotoxy (35, wherey);

write ('I=', delta[2][2]:5:14);

gotoxy (57, wherey);

writeln ('I=', delta[2][1]:5:14);

writeln;

writeln ('Для перезавантаження програми натиснiть клавiшу R');

writeln ('Для виходу натиснiть будь-яку клавiшу');

ch:=readkey;

if ch='r' then goto lbl1;

END.