Написать текст программы Язык программирования паскаль Написать формулу на алгоритмическом языке

Написать текст программы: Язык программирования паскаль Написать формулу на алгоритмическом языке: y = b — sin2(b2- 4a)(0.6b2+ a2c) begin var a,b,c,y:Real; write(‘A = ‘); read(a); write(‘B = ‘); read(b); write(‘C = ‘); read(c); y:=(b-(Power(sin(b*b-4*a),2)))/(0.6*b*b-Power(a,2*c)); write(‘Y = ‘); write(y); end. Составить блок – схему алгоритма для вычисления значения функции F в зависимости от аргументов x и y: F(x, y) = 0.42x+-3y, если x+y ≤2(x9+ y)3, если 2<x+y<6x+ y2+ sin5 , если x+y ≥6 begin var x,y,f:Real; write(‘X = ‘); read(x); write(‘Y = ‘); read(y); if x+y<=2 then f:=0.42*x+abs(-3*y); if (2<x+y) then if (x+y<6) then f:=Power(Power(x,9)+y,3); if (x+y>=6) then f:=sqr(x+y*y+sin(5)); write(‘F = ‘); write(f); end. Написать программу для вычисления значения функции S = sin5(m4)m — ln(0.9-m)arctg(m+5) begin var m,f:Real; write(‘M = ‘); read(m); f:=Power(Sin(Power(m,4)),5)/sqr(m) — ln(0.9-m)/Arctan(m+5); write(‘F = ‘); write(f); end. Написать программу и составить блок–схему для вычисления произведения P=M*N, где M = x3 – sin(x — 3) – cos2(x — 2), N = ln2(x) – 2ln(x) – 4, при этом х = 1,5652 begin var x,n,m,p:Real; x:=1.5652; m:=power(x,3)-Sin(x-3)-power(Cos(x-2),2); n:=power(ln(x),2)-2*ln(x)-4; write(‘P = ‘); write(m*n); end. Написать программу и составить блок-схему для вычисления всех значений функции Z(x)=cos(sin(x)),если переменная х меняется в интервале [-3;1] с шагом hx=0.17 begin var x,z:Real; x:=-3; while x <= 1 do begin z:=cos(sin(x)); write(‘Z = ‘); write(z); write(‘ при х = ‘); write(x); writeln; x:=x+0.17; end; end. Написать программу и составить блок-схему для определения минимального значения функции W(y)=4sin(2 — y)cos(y — 6), если переменная у меняется в интервале [3;4] с шагом hy = 0.095 begin var x,w,min:Real; x:=3; min:=4*sin(2 — x)*cos(x — 6); while x <= 4 do begin w:=4*sin(2 — x)*cos(x — 6); write(‘W = ‘); write(w); write(‘ при х = ‘); write(x); writeln; if w<min then min:=w; x:=x+0.095; end; write(‘Min = ‘); write(min); end.

Тип работы:

Решение задач

Предмет:

Информатика

Статус:

выполнено

Стоимость. Рублей:

140

Дата выполнения:

2014-12-05

Understand your user experience

I am text block. Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Read More

remain responsive across devices

I am text block. Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Read More

fall in love with our features

Real time stats

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar dapibus leo.

Multilingual & translatable

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar.

Less plugins needed

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar dapibus leo.

Amazingly responsive

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar dapibus leo.

Community builder

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar dapibus leo.

Easy to use interface

Click edit button to change this text. Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec mattis, pulvinar dapibus leo.

Выполним любую работу на заказ

У нас вы можете заказать уникальное решений этой задачи или любой другой

Adblock detector