Задания
Версия для печати и копирования в MS Word
Тип 6 № 47394
i

Ис­пол­ни­тель Че­ре­па­ха дей­ству­ет на плос­ко­сти с де­кар­то­вой си­сте­мой ко­ор­ди­нат. В на­чаль­ный мо­мент Че­ре­па­ха на­хо­дит­ся в на­ча­ле ко­ор­ди­нат, её го­ло­ва на­прав­ле­на вдоль по­ло­жи­тель­но­го на­прав­ле­ния оси ор­ди­нат, хвост опу­щен. При опу­щен­ном хво­сте Че­ре­па­ха остав­ля­ет на поле след в виде линии. В каж­дый кон­крет­ный мо­мент из­вест­но по­ло­же­ние ис­пол­ни­те­ля и на­прав­ле­ние его дви­же­ния. У ис­пол­ни­те­ля су­ще­ству­ет две ко­ман­ды: Вперёд n (где n  — целое число), вы­зы­ва­ю­щая пе­ре­дви­же­ние Че­ре­па­хи на n еди­ниц в том на­прав­ле­нии, куда ука­зы­ва­ет её го­ло­ва, и На­пра­во m (где m  — целое число), вы­зы­ва­ю­щая из­ме­не­ние на­прав­ле­ния дви­же­ния на m гра­ду­сов по ча­со­вой стрел­ке. За­пись По­вто­ри k [Ко­ман­да1 Ко­ман­да2 … Ко­ман­даS] озна­ча­ет, что по­сле­до­ва­тель­ность из S ко­манд по­вто­рит­ся k раз. Че­ре­па­хе был дан для ис­пол­не­ния сле­ду­ю­щий ал­го­ритм: По­вто­ри 10 [Вперёд 5 На­пра­во 60].

Опре­де­ли­те, сколь­ко точек с це­ло­чис­лен­ны­ми ко­ор­ди­на­та­ми будут на­хо­дить­ся внут­ри об­ла­сти, огра­ни­чен­ной ли­ни­ей, за­дан­ной дан­ным ал­го­рит­мом. Точки на линии учи­ты­вать не сле­ду­ет.

Спрятать решение

Ре­ше­ние.

Решим эту за­да­чу, ис­поль­зуя язык про­грам­ми­ро­ва­ния Python.

import turtle as t # Под­клю­чим мо­дуль че­ре­паш­ка

k = 30

t.left(90)

t.speed(10)

for i in range(10): # про­пи­шем ал­го­ритм по­стро­е­ния фи­гу­ры по усло­вию

t.forward(5 * k)

t.right(60)

t.up()

t.speed(10) # Уве­ли­чим ско­рость че­ре­паш­ки

for x in range(10, -5, - 1): # Ал­го­ритм по­стро­е­ния точек

for y in range(10, -10, - 1):

t.goto(x * k, y * k)

t.dot(3) # точки раз­ме­ром 4 пик­се­ля

t.done()

Те­перь по­счи­та­ем ко­ли­че­ство точек внут­ри на­ри­со­ван­ной фи­гу­ры, по­лу­ча­ем 62.

 

Ответ: 62.

 

При­ведём ре­ше­ние Ар­те­ма Нер­си­ся­на на языке Python.

from turtle import *

color("black", "red")#black line, red inside

tracer(0)#fast work

m=20

begin_fill()#fill background

for i in range(6):#couse 6 corners(углов)

forward(5*m)

right(60)

end_fill()

update()

can = getcanvas()

c=0

for x in range(-25*m,25*m,m):#check full screnn

for y in range(-25*m,25*m,m):

if can.find_overlapping(x,y,x,y) == (5,):

#red background (5,) or + line (5, 4)

c += 1

print(c)

 

 

При­ведём ре­ше­ние Сер­гея Донец на языке PascalABC.NET.

uses turtle;

begin

down;

loop 10 do begin{По­вто­ри 10

[Вперёд 5 На­пра­во 60].}

Forw(5);TurnRight(60);

end;

end.


Аналоги к заданию № 47392: 47394 Все