Сколько троек чисел x, y, z от 1 до 100 удовлетворяют условию "x + y + z делится на 17"?

Будем считать тройки, получаемые перестановкой чисел, различными. Например, (1, 2, 3) и (2, 1, 3) - это разные тройки

Question

Информатика

Рим

28 августа, 17:24

Сколько троек чисел x, y, z от 1 до 100 удовлетворяют условию "x + y + z делится на 17"?

Будем считать тройки, получаемые перестановкой чисел, различными. Например, (1, 2, 3) и (2, 1, 3) - это разные тройки

+4

Ответы (1)

Знаете ответ на вопрос?

Таюся · Answer 1

Var

x, y, z:byte;

k:integer;

Begin

k:=0;

For x: = 1 to 100 do

For y: = 1 to 100 do

For z: = 1 to 100 do

if (x+y+z) mod 17 = 0 then k:=k+1;

WriteLn ('k = ', k) ;

End.

k = 58823