Вычислить значение функции y=a-bcd-cx², от x=m до первого у<-10. Решите пожалуйста, очень срочно
Ответы
Ответ дал:
0
Program Dafnochka;
uses crt;
var
a,b,c,d,m,t,x,y:real;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
writeln('Введите числа:');
write('a: '); readln(a);
write('b: '); readln(b);
write('c: '); readln(c);
write('d: '); readln(d);
write('m: '); readln(m);
writeln('Введите шаг табуляции t: '); readln(t);
y:=1;
x:=m;
while y>=-10 do
begin
y:=a-b*c*d-c*x*x;
writeln('x=',x:7:2,' y=',y:7:2);
x:=x+t;
end;
end.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
9 лет назад
9 лет назад