Протабулюйте функцію z=cos(2x-3y),змвнюючи х на проміжку (0;2) з кроком 0.2,а Y на проміжку (0;1) з кроком 0.1.
//Pascal ABC.NET v3.0 сборка 1111
//В случае, если x принадлежит 0 и 2, а y-0 и 1.
var
x,y,z:real;
i:integer;
begin
x:=0;
y:=0;
for i:=1 to 11 do
begin;
z:=cos(2*x-3*y);
writeln(z,=cos(,2*x,-,3*y,), при x=,x, и y=,y);
x:=x+0.2;
y:=y+0.1;
end;
end.
// В случае, если x не принадлежит 0 и 2, а y-0 и 1.
var
x,y,z:real;
i:integer;
begin
x:=0.2;
y:=0.1;
for i:=1 to 9 do
begin;
z:=cos(2*x-3*y);
writeln(z,=cos(,2*x,-,3*y,), при x=,x, и y=,y);
x:=x+0.2;
y:=y+0.1;
end;
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
