Посредством SQL запросов, как и в обольшенсве баз данных
X := 47
z := 1
i := 0
1 итерация цикла:
z := (1+47/2)/2 = 12,25 (округляем, получаем 12,2)
i := 0 + 1 = 1
2 итерация цикла:
z := (12,2 + 47/2)/2 = 17,85 (округляем, получаем 17,8)
i := 1 + 1 = 2
3 итерация цикла:
z := (17,8 + 47/2)/2 = 20,65 (округляем, получаем 20,6)
i := 2 + 1 = 3
4 итерация цикла:
z := (20,6 + 47/2)/2 = 22,05 (округляем, получаем 22)
i := 3 + 1 = 4
i < 4 - условие не выполняется, выводим 22
Ответ: 22
У Алексея есть родной брат. Поскольку мальчиков всего 3 и у Миши родного брата нет, то родной брат Алексея - Гриша.
Гриша говорит, что у него нет родных сестер, потому в семье Алексея и Гриши только 2 мальчика.
У Маши и Насти есть по брату и сестре, тогда их семья состоит из Маши, Насти и последнего мальчика Миши
Света тогда получается единственный ребенок
Настя, Маша, Миша - больше девочек - сестра
Света - больше девочек - сестра
Гриша, Алексей - больше мальчиков - брат
2 сестры и 1 брат
Var a,b,k:integer;
function kol(x,y:integer):integer;
Begin
if x=0
then kol:=0
else if x mod 10 = y then kol:=kol(x div 10,y)+1
else kol:=kol(x div 10,y);
end;
begin
readln(a,b);
k:=kol(a,b);
writeln(k);
end.
Пример:
13093 3
2
