Регистрация
nastya2740
19.02.2023 08:40
Информатика
Есть ответ 👍

Сколько троек чисел x, y, z от 1 до 100 удовлетворяют условию "x + y + z делится на 17"? будем считать тройки, получаемые перестановкой чисел, различными. например, (1, 2, 3) и (2, 1, 3) — это разные тройки

143
455
Посмотреть ответы 2

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

нигяр121
нигяр121
4,7(22 оценок)
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
albinakoptleuova06
albinakoptleuova06
4,4(84 оценок)

Відповідь:

Ошибок нету. Вроде работает.

Пояснення:

Переменных 3.


2 переменных типа byte — это знаковый 8-битовый тип. Его диапазон — от -128 до 127.

1 переменная типа real

Популярно: Информатика