Вопрос задан 08.05.2019 в 07:34. Предмет Информатика. Спрашивает Алексеева Анастасия.

Даны x,y,z. Определить переменные кратные 3 (делиться на три без остатка), в случае отсутствия

таких переменных напечатать соответствующие сообщения Помогите, пожалуйста
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Kit Nikita.
Var  x, y, z, k: integer;

begin 
readln(x, y, z);
k:=0; 
if (x mod 3 = 0) then begin inc(k); writeln(x, ' кратно трем');end; 
if(y mod 3 = 0) then begin inc(k); writeln(y, ' кратно трем');end; 
if (z mod 3 = 0) then begin inc(k); writeln(z, ' кратно трем'); end; 
if (k =0) then writeln('Переменных, кратных трем, не обнаружено!');
end.
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно, я помогу! Для определения того, являются ли переменные x, y и z кратными 3 (т.е. делятся на 3 без остатка), нужно использовать операцию остатка от деления (%). Если результат деления переменной на 3 равен 0, то это значит, что переменная кратна 3.

Вот как это можно сделать на языке программирования Python:

```python # Заданные значения переменных x, y, z x = 15 y = 7 z = 9

# Проверка кратности переменных 3 if x % 3 == 0: print(f"x = {x} кратно 3") else: print(f"x = {x} не кратно 3")

if y % 3 == 0: print(f"y = {y} кратно 3") else: print(f"y = {y} не кратно 3")

if z % 3 == 0: print(f"z = {z} кратно 3") else: print(f"z = {z} не кратно 3") ```

В данном примере используются значения переменных x, y и z, и для каждой из них проверяется кратность 3. Если переменная кратна 3, будет напечатано сообщение об этом, иначе будет напечатано сообщение о том, что переменная не кратна 3.

Если нужно проверить другие значения переменных, их нужно просто заменить в коде.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос