Program praktyka8;
uses graphABC;
begin
setwindowsize(640,480);
setwindowtitle('Відновіть малюнок');
setbrushcolor(clgreen);
rectangle(0,350,640,480);
setbrushcolor(clbrown);
rectangle(70,275,215,415);
line(150,180,70,275);
line(70,275,215,275);
line(215,275,150,180);
floodfill(150,250,clbrown);
circle(150,250,18);
setbrushcolor(clblue);
floodfill(150,250,clblue);
setbrushcolor(clblue);
rectangle(75,315,120,375);
setbrushcolor(clsilver);
rectangle(150,315,200,415);
setpencolor(clyellow);
setbrushcolor(clyellow);
line(25,25,150,75);
line(25,25,145,80);
line(25,25,140,85);
line(25,25,130,95);
line(25,25,125,100);
line(25,25,115,110);
line(25,25,110,115);
line(25,25,100,125);
line(25,25,95,130);
line(25,25,85,135);
line(25,25,80,140);
line(25,25,75,145);
setbrushstyle(bssolid);
circle(25,25,30);
setbrushcolor(clbrown);
setpencolor(clbrown);
rectangle(307,425,317,400);
setbrushcolor(cllime);
setpencolor(clblack);
ellipse(250,150,375,400);
setpencolor(clblack);
rectangle(450,400,465,375);
rectangle(500,400,515,375);
rectangle(425,375,540,365);
end.
Объяснение:
Во многих местах были орфографические ошибки, поэтому и не запускалось.
№1
pers1 = 'китенок'
print(pers1)
pers2 = 'динозавр Митя'
print(pers2)
pers3 = 'Леонид Васильевич'
print(pers3)
act1 = 'плыл по морю'
print(act1)
act2 = 'рыбачил'
print(act2)
act3 = 'решал задачу'
print(act3)
def1 = 'в кузове грузовика'
print(def1)
def2 = 'в красных башмаках'
print(def2)
def3 = 'в пурпурном пиджаке'
print(def3)
print(pers2, act1, def3)
print(pers1, act2, def2)
print(pers3, act2, def1)
print(pers2, act3, def2)
№2
print('|-|--|---||||||||||||||')
№3
print(2, 3, 5, 7)
print(11, 13, 17, 19)
print(23, 29, 31, 37)
print(41, 43, 47)
№4
print('print("Привет, мир!")')
