Матрёшки выстроены в ряд по росту. Для заданного числа матрёшек N определить размер самой маленькой, если каждая матрёшка

var N: integer; i: integer; R: single;begin write(\'Введите количество матрешек\'); readln(N); R:= 80; for i:=2 to N do R:= R * 0.7; write(\'Самая маленькая \', R);end.Если матрешка меньше на 30%, значит ее размер составляет 70% от предыдущей. Т.е. размер предыдущей матрешки нужно умножить на \"0.7\".Размер матрешек сохраняется в переменной \"R\".У первой матрешки размер равен 80см и в переменную \"R\" изначально записывается число \"80\".Размер второй и последующих матрешек находится в цикле как \"R * 0.7\".