Задание 1.1
Вычислить значение функции y(x) на промежутке [1;2.8] с шагом h=0.3.
В Pascal:
program z1;
Возможно вы искали - Контрольная работа: Компьютерные информационные технологии
uses crt;
var Xn,Xk,X,Y,H,Z:REAL;
begin
clrscr;
write('‚Enter Xn,Xk,H=');
Похожий материал - Курсовая работа: Машинное зрение
readln(Xn,Xk,H);
X:=Xn;
repeat
z:= 1-exp((0.5)*x);
if z=0 then writeln('NO') else
Очень интересно - Лабораторная работа: Ознайомлення з програмним пакетом MicroSim PSPICE 8.0
Y:=ln(6.8*sqrt(x))*(exp((1/3)*(ln(abs(Z))))*(abs(Z)/Z));
writeln('X=',X:6:1,' Y=',Y:8:3);
X:=X+H;
until X>=Xk+H/2;
readkey;
Вам будет интересно - Курсовая работа: Ресурсы Интернета как источник информационного обеспечения процесса комплектования фондов библиотек
end.
Результаты вычислений:
В Excel:
Похожий материал - Реферат: Защита информации в экономических информационных системах (ЭИС)
В MathCAD :
В Delphi:
