Ответ:
(см. объяснение)
Объяснение:
Могу привести решение на паскале (строится график котангенса):
uses GraphABC;
var x: real;
begin
setwindowsize(500,300);
setwindowcaption('y=ctg(x)');
x:=0;
while(x<=15) do
if(x>0) then setpixel(round(x*(windowwidth-35)/15),windowheight div 2+round(tan(x)*2*(windowheight div 2-35)/15),clBlack);
x:=x+0.0001;
end;
end.
Демонстрация работы программы приложена в прикреплённом файле.
Задание выполнено!
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
(см. объяснение)
Объяснение:
Могу привести решение на паскале (строится график котангенса):
uses GraphABC;
var x: real;
begin
setwindowsize(500,300);
setwindowcaption('y=ctg(x)');
x:=0;
while(x<=15) do
begin
if(x>0) then setpixel(round(x*(windowwidth-35)/15),windowheight div 2+round(tan(x)*2*(windowheight div 2-35)/15),clBlack);
x:=x+0.0001;
end;
end.
Демонстрация работы программы приложена в прикреплённом файле.
Задание выполнено!