:задано уравнение прямой.построить на экране эту прямую. pascal (материал 11 класса)
299
328
Ответы на вопрос:
Uses graph; var xc,yc,m,x1,y1: integer; x,y: real; begin xc: =0; initgraph(xc,yc,''); xc: =getmaxx div 2; yc: =getmaxy div 2; m: =yc div 2; line(5,yc,getmaxx-5,yc); line(xc-m,yc+3,xc-m,yc-3); outtextxy(xc-m,yc+10,'-1'); outtextxy(xc+5,yc+10,'0'); line(xc+m,yc+3,xc+m,yc-3); outtextxy(xc+m,yc+10,'1'); line(xc,5,xc,getmaxy-5); line(xc-3,yc-m,xc+3,yc-m); outtextxy(xc-10,yc-m,'1'); line(xc-3,yc+m,xc+3,yc+m); outtextxy(xc-15,yc+m,'-1'); setcolor(12); line(xc-m,yc,xc,yc-m); line(xc,yc-m,xc+m,yc); line(xc+m,yc,xc,yc+m); line(xc,yc+m,xc-m,yc); x: =-4; while x< =4 do begin y: =0.52*x+0.18; x1: =xc+round(x*m); y1: =yc-round(y*m); putpixel(x1,y1,14); x: =x+0.01; end; readln end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
marinakrivoshe03.04.2020 21:43
-
ееееее15ег01.01.2020 09:51
-
iljapradunp06w1114.03.2021 03:23
-
Адил111111111120.03.2023 11:44
-
оля191104.12.2021 09:17
-
nastprin08.06.2023 10:14
-
tanyakozina0031.07.2021 15:38
-
zab129004.11.2022 21:40
-
Znanija182107.03.2021 12:32
-
natalipanshina07.11.2020 15:43
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.