Реферат: Пояснительная записка к курсовой работе

s:text;

begin

assign(s,'A:\Первая.txt');

rewrite (s);

Writeln ('Прграмма вычисления с использованием нестандартных функций');

Writeln ('Разроботал студент гр.ТМДу-21 Кондратьев В.В.');

Writeln ('y=ln(x^2-a^2)+ln(sh)x))');

Writeln (s,'Прграмма вычисления с использованием нестандартных функций');

Writeln (S,'Разроботал студент гр.ТМДу-21 Кондратьев В.В.');

Writeln (s,'y=ln(x^2-a^2)+ln(sh)x))');

write ('введите x ');

readln(x);

write ('введите a ');

readln(a);

y:= ln(sqr(a)-sqr(x))+ln((exp(x)+exp(-x))/2);

writeln('функция y= ',y:4:2);

readkey;

close (s);

end.

1.2. Результат машинного и ручного счета.

Результат машинного расчета для x=1, a=2; получим у=1,527

Ручной счет получим равным:

Ошибка вычисления составляет:

1.3. Вывод: Результаты ручного и машинного расчета можно считать близкими к верным с погрешностью вычисления .

23

2. Программирование нестандартных функций