написать код на Паскале, нужно построить график - вопрос №134610033 от Крайз 18.09.2022 20:39

Question

Информатика: написать код на Паскале, нужно построить график функции x=y^(-3).

Крайз · Answer

uses GraphABC; begin var f:real- real:=x- x**-3; var (w,h,k) := (200,200,30); Window.SetSize(w*2,h*2); foreach var p in PartitionPoints(-(w div k)-1,(w div k)+1,(5*w*h div k)).Select(x- ((w+x*k),(h-f(x)*k))) do if (p[1] 0) and (p[1] h*2) and (p[0] w*2) then Circle(Round(p[0]),Round(p[1]),2); end.w - 1/2 длины окна  - (200).h  - 1/2 высоты окна  - (200).k  - зум  - (30).Пример работы:...