Дальше у нас идёт цикл в предусловием, который будет "откусывать" по цифре каждый проход, пока n > 0. Внутри цикла мы проверяем цифру на четность, если четна, то мы прибавляем к сумме, если нет, то ничего не делаем.
Получается, что программа находит сумму четных цифр в числе.
В нашем числе 2 четные цифры, 4 + 8 = 12
ответ: 12
Спасибо
Ответ дал: Гость
program pryam;
var y1, y2, y3, x1, x2 : real;
begin
writeln ('введите координату (у) верхней точки прямой');
readln (y1);
writeln ('введите координату (у) нижней точки прямой');
writeln ('введите координату (у) точки, принадлежность к прямой которой нужно определить');
readln (y3);
writeln ('введите координату (х) точки, принадлежность к прямой которой нужно определить');
readln (x2);
if (y3< =y1) and (y3> =y2) and (x2=x1) then writeln (' принадлежит ')
else writeln (' не принадлежит ');
readln;
end.
Ответ дал: Гость
20, если он возьмёт 19 правых, то 20-ая уже гарантирована будет левой и пара будет составлена. если он возьмёт меньше двадцати перчаток, то есть шанс, что все они будут правые.
Популярные вопросы