Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Вычислить y = x3 4x2 sin 2x при заданном знсчении x

Ответ оставил Гость

var x,y,n,m,s,z:real;i,k:integer;
begin
write(Введите начало и конец диапазона по х); Read(n,m);
write(Введите шаг расчета по х); Read(z);
k:= round((m - n)/z)+1;x:=n;
for I:= 1 to k do begin
y:= x * 34* 2*sin(x);
writeln(x:4:1,y:11:6);x:= x + z;end;end.