Дачник Вася решил вымостить свою садовую дорожку плиткой, плитки у Васи двух типов 40 на 20 см и 60 на 20 см. Дорожка прямая и узенькая - ровно в одну плитку шириной 20 см. Класть плитку поперек дорожки Вася не может, чтобы не повредить посадки. Вася измерил длину дорожки. Она оказалась ровно N см. Помогите Васе понять, сможет ли он уложить плитку в точности по всей длине дорожки, не прибегая к разрезанию плитки. (плитки укладываются без шва.)

Question

Информатика

Октябрина

11 июня, 19:59

Дачник Вася решил вымостить свою садовую дорожку плиткой, плитки у Васи двух типов 40 на 20 см и 60 на 20 см. Дорожка прямая и узенькая - ровно в одну плитку шириной 20 см. Класть плитку поперек дорожки Вася не может, чтобы не повредить посадки. Вася измерил длину дорожки. Она оказалась ровно N см. Помогите Васе понять, сможет ли он уложить плитку в точности по всей длине дорожки, не прибегая к разрезанию плитки. (плитки укладываются без шва.)

+5

Ответы (1)

Знаете ответ?

Вася · Answer 1

Var n, i, k:integer;

begin

readln (n) ;

k:=0;

for i:=0 to n div 40 do

if (n-i*40) mod 60 = 0 then k:=1;

if k=1 then writeln ('YES')

else writeln ('NO') ;

end.

Пример:

180

YES