Нужно перевести из pascal на python, ) uses graphabc,crt; var x,y,y0,ys,i,s: integer; k,q: real; begin setwindowsize(700,500); write('сколько секунд должны отсчитать часы? '); readln(s); setpencolor(clnavy); arc(200,410,200,-8,61); arc(400,410,200,119,-170); arc(200,70,200,-60,7); arc(400,70,200,173,-120); setbrushcolor(clsilver); setpencolor(clblack); rectangle(170,50,430,30); rectangle(170,450,430,430); floodfill(250,110,clskyblue); floodfill(250,410,clskyblue); k: =80; x: =300; q: =0; for y: =130 to 230 do begin setpencolor(clnavy); line(round(x-k),y,round(x+k),y); k: =k-q; if y mod 25=0 then q: =q+0.45; end; k: =80; x: =300; q: =0; y0: =430; for y: =130 to 230 do begin setpencolor(clskyblue); line(round(x-k),y,round(x+k),y); k: =k-q; if y mod 25=0 then q: =q+0.45; setpencolor(clnavy); line((x-100),430,x,y0); line(x,y0,(x+100),430); sleep(10*s); y0: =y0-1; for i: =1 to 20 do begin ys: =random(151)+250; putpixel(300,ys,clnavy); end; for i: =1 to 20 do begin ys: =random(101)+230; putpixel(300,ys,clskyblue); end; end; setpencolor(clskyblue); line(300,250,300,330); setpencolor(clnavy); arc(200,410,200,-8,61); arc(400,410,200,119,-170); arc(200,70,200,-60,7); arc(400,70,200,173,-120); setbrushcolor(clsilver); rectangle(170,50,430,30); rectangle(170,450,430,430); writeln(s,' секунд истекло! '); end.

293

442

Посмотреть ответы 1

Ответы на вопрос:

даша55516

Информатика

4,4(34 оценок)

Птаха07 советую пойти на курсы в белгу в белгороде(если ты там живешь конечно) занимательно обучение стоит в год-9000тысяч

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.