Разработать пользовательскую процедуру вычисления значения выражения 1)Вычислить 7 значений функций у=0,15x+a/a2+x2 где начальное значение а=0.14х, шаг а=0.22
Правильный ответ: 7 Ты из пункта А в пункт B едешь 2км. Из B в пункт E 5км.
То есть куда тебе нужно из серой клетки попасть в другую серую. Например из А в пункт B, ты уже проехал 2км. Далее смотришь по горизонтали куда можно поехать. Ты видишь 3км (в столбике С) и 5км (в столбике E). Например выбираешь С и спускаешь на серую клетку. Далее от неё смотришь 6 (столбик D) и 10 (столбик E). Дальше так же выбираешь и спускаешься, но это я на пример показал длинный путь. Самый кратчайший я написал под правильным ответом. Надеюсь понятно объяснил, если что пиши в комментариях или в сообщения.
Код в Turbo Pascal: USES Graph,CRT; VAR x,y,dx,dy,Device,Mode,i: Integer; BEGIN Device:=0; InitGraph(Device,Mode,''); x:=10; y:=10; dx:=1; dy:=1; i:=1; Repeat SetColor(Cyan); Circle(x,y,10); SetFillStyle(1,3); FloodFill(x,y,Cyan); Delay(10); SetColor(Black); Circle(x,y,10); SetFillStyle(1,0); FloodFill(x,y,Black); x:=x+dx; y:=y+dy; if (x>300) OR (y>200) then begin x:=10; y:=10; i:=i+1; end;
Ты из пункта А в пункт B едешь 2км.
Из B в пункт E 5км.
То есть куда тебе нужно из серой клетки попасть в другую серую. Например из А в пункт B, ты уже проехал 2км. Далее смотришь по горизонтали куда можно поехать. Ты видишь 3км (в столбике С) и 5км (в столбике E). Например выбираешь С и спускаешь на серую клетку. Далее от неё смотришь 6 (столбик D) и 10 (столбик E). Дальше так же выбираешь и спускаешься, но это я на пример показал длинный путь. Самый кратчайший я написал под правильным ответом.
Надеюсь понятно объяснил, если что пиши в комментариях или в сообщения.