А)Составьте программку ,которая дозволяет с клавиатуры ввести значения переменных x и
А)Составьте программку ,которая дозволяет с клавиатуры ввести значения переменных x и y,и проверяет истинность выражения: "Желая бы одно из чисел нечётное.
Б)Составьте программу ,которая дозволяет с клавиатуры ввести значения переменных x и y,и инспектирует истинность выражения:
"Каждое из чисел чётное.
Номер 1
Program n_1;
Var x, y:integer;
Begin
read(x, y);
if (x mod 2 = 1) or (y mod 2 = 1) then writeln('По последней мере одно из чисел нечетное')
else writeln('Нечетных чисел тут нет');
End.
Номер 2
Program n_2;
Var x, y:integer;
Begin
read(x, y);
if (x mod 2 = 0) and (y mod 2 = 0) then writeln('Оба числа четные')
else writeln('По последней мере одно из чисел нечетное');
End.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.