Нарисуйте машину в паскале abc 15
мой айди в вк id547202033

АлсушкаСушка АлсушкаСушка    3   08.12.2019 11:36    1

Ответы
tri0 tri0  11.09.2020 15:48

program Speed;

uses crt,graph;

Var gd,gm:integer;

begin

clrscr;

detectgraph (gd,gm);

initgraph (gd,gm,'tp\7');

{koleca}

circle (180,330,30);

circle (180,330,40);

circle (450,330,30);

circle (450,330,40);

Line (140,340,60,340);

Line (220,340,412,340);

Line (490,340,520,340);

Line (520,340,520,270);

Line (520,270,390,270);

Line (390,270,360,180);

Line (360,180,210,180);

Line (210,180,150,270);

Line (150,270,60,270);

Line (60,270,60,340);

Readln

end.

вставь в паскаль и проверь)

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика