Студопедия

КАТЕГОРИИ:

АстрономияБиологияГеографияДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРиторикаСоциологияСпортСтроительствоТехнологияФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника


ВЫЧИСЛЕНИЕ ЗНАЧЕНИЙ АРИФМЕТИЧЕСКИХ ВЫРАЖЕНИЙ. Составить схему алгоритма и программу для вычисления значения функции W=W(x,y,z ).Вывести значения аргументов x




Задание №1

Составить схему алгоритма и программу для вычисления значения функции W=W(x,y,z ).Вывести значения аргументов x, y, z и функции W.

; X=0.145, y= -1.45, z=2.145.

var

x,y,z,w:real;

begin

x:=0.145;

y:=-1.45;

z:=2.145;

w:=exp(-sqr(cos(x))*ln(2))+ln(abs(sqrt(1+y*y)-sqrt(1+z*z)));

writeln('X=',x:4:3);

writeln('Y=',y:4:3);

writeln('Z=',z:4:3);

writeln('W=',w:10:9);

readln;

end.

ЛИНЕЙНЫЙ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС

 

Задание 2

Составить схему алгоритма и программу для вычисления значений соответствующих данному варианту величин. Вывести все значения вычисляемых величин.

;

;

;

u= ;

t= ;

s=cos3+arctg1,2 .

 

var s,t,u,v,w,r:real;

begin

s:=cos(3)+arctan(1.2);

t:=cos(s)/sin(s)+exp(-s/2*ln(2));

u:=1/exp(1/3*ln(1+t*t+s*s));

v:=exp(-u)-arctan(sqrt(1-sqr(u*u/(t*t+u*u))/u*u/(t*t+u*u)));

w:=ln(5+exp(1/5*ln(u*u))+exp(1/5*ln(v*v)));

r:=abs(sin(u)+cos(v)-cos(u+v+w));

writeln('S=',s:10:9);

writeln('T=',t:10:9);

writeln('U=',u:10:9);

writeln('V=',v:10:9);

writeln('W=',w:10:9);

writeln('R=',r:10:9);

readln;

end.

 


Поделиться:

Дата добавления: 2015-02-10; просмотров: 218; Мы поможем в написании вашей работы!; Нарушение авторских прав





lektsii.com - Лекции.Ком - 2014-2024 год. (0.005 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав
Главная страница Случайная страница Контакты