В таблице на пересечение столбца B и строки A, стоит цифра 4. Сбоку проверяет отрезки BA, он должен быть равен 4. Все подходят.Остальные аналогично проверяем . Столбец D пересекает строчку A, в данной клеточке число 5. DA=5; BC=3; BD=6; ищем сбоку рисунок у которого отрезки равны этим величинам.
Ответ: 4 ( в правом нижнем углу) <span />
Решение, который дал другой пользователь, слишком сложное. Я могу предложить альтернативный вариант, который будет гораздо проще в понимании.
Var a,s,s1:integer;
Begin
write('Введите число -> ');
readln(a);
s1:=1;
while a>0 do
begin
s:=s+(a mod 10);
s1:=s1*(a mod 10);
a:=a div 10;
end;
writeln('Сумма цифр числа равна -> ',s);
writeln('Произведение цифр числа равно -> ',s1);
End.
Так как количество лилий с каждым днём становилось в 2 раза больше, то для заполнения половины пруда понадобилось 10-1 = 9 дней.
К десятому дню выросло 1*2=2*2=4*2=8*2=16*2=32*2=64*2=128*2=256*2=512*2=1024 лилий.