ответ:Это похоже на условный оператор if. Однако в случае циклических операторов их тела могут выполняться далеко не один раз. В случае if, если логическое выражение в заголовке возвращает истину, то тело выполняется единожды. После этого поток выполнения программы возвращается в основную ветку и выполняет следующие выражения, расположенные ниже всей конструкции условного оператора.
В случае while, после того как его тело выполнено, поток возвращается к заголовку цикла и снова проверяет условие. Если логическое выражение возвращает истину, то тело снова выполняется. Потом снова возвращаемся к заголовку и так далее.
Цикл завершает свою работу только тогда, когда логическое выражение в заголовке возвращает ложь, то есть условие выполнения цикла больше не соблюдается. После этого поток выполнения перемещается к выражениям, расположенным ниже всего цикла. Говорят, "происходит выход из цикла".
Объяснение:
program Chernovik;
var a: integer;
begin
write ('Введите трехзначное число: ');
readln (a);
if a > ((a mod 10) * (a div 100) * (a div 10 mod 10))
then write ((a mod 10) * (a div 100) * (a div 10 mod 10), ' < ',a)
else write ((a mod 10) * (a div 100) * (a div 10 mod 10),' >= ',a)
end.
Объяснение:
a mod 10 - последняя цифра трёхзначного числа
a div 100 - первая цифра трёхзначного числа
a div 10 mod 10 - средняя цифра трёхзначного числа
div - целочисленное деление
mod - остаток от целочисленного деления
