Размещено 2 года назад по предмету
Информатика
от flayneigboure
1) С клавиатуры вводится трёхзначное число. Нужно вывести ответ «Да», если все его
цифры четные, и ответ «Нет» в остальных случаях. Если введено не трёхзначное число,
должно быть выведено сообщение «Неверное число».
2) Требовалось написать программу, которая определяет, имеется ли среди введенных с
клавиатуры положительных целых чисел а и b хотя бы одно четное. Была написана
следующая программа:
var a, b: integer;
begin
readln(a, b);
a := a mod 2;
if a > 0 then b := b mod 2;
if b > 0 then
writeln ('четных чисел нет')
else
writeln ('четное число есть');
end.
Известно, что программа написана с ошибками. Последовательно выполните три задания:
а) приведите пример таких чисел а, b, при которых программа неверно решает поставленную задачу;
б) укажите, как, по вашему мнению, нужно доработать программу (не используя
сложные условия), чтобы не было случаев ее неправильной работы;
в) укажите, как можно доработать программу, чтобы она вместо вложенных операторов IF содержала один условный оператор со сложным условием.