100x+10y+3-исходное число
300+10x+y-новое число, тогда:
300+10x+y=300x+30y+9+1, так как 9+1=10, то
y=0
300+10x=300x+10->290x=290->x=1
Исходное число:103
Проверка:
310=103*3+1-> 310=310
вот так
Ответ:
12
Объяснение:
Элементарная арифметика 36/6 = 6 , а 6+6 = 12
12022, 1222, 989, 90899, 9000
<em>// PascalABC.NET 3.2, сборка 1399 от 08.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadReal('Площадь решета равна');
var a:=ReadArrReal('Введите диаметры клубней:',10);
var d:=sqrt(4*s/pi);
var b:=a.Where(x->x<d);
var n:=b.Count;
if n>0 then begin
Write('Пройдут клубни диаметром '); b.Print;
Writeln(' - всего ',n,' шт.')
end
else Writeln('Ни один клубень не пройдет')
end.
<u>Пример</u>
Площадь решета равна 45
Введите диаметры клубней: 8.6 7.1 9 10.2 6.4 5 6 8.2 6.6 7
Пройдут клубни диаметром 7.1 6.4 5 6 6.6 7 - всего 6 шт.