Тут надо выбрать правильно записанный фрагмент,в А нет ошибок,в Б (Y=Y*K;),а оператор присваивания это (:=).<span>В С точка с запятой не ставится после Do и после Begin.В D K:=1 do 50(будет 50 повторений,а надо 15) и Y=Y*K.</span>
Есть формула для определения количества комбинаций:
N = n1 * n2 * ... nk
Согласно ей, нам необходимо определить количество вариантов для каждой позиции
Количество цифр в номере равно 3.
Соответственно у нас есть три позиции, для каждой из которых есть 4 варианта цифр. Каких-либо ограничений на использование нет.
4*4*4 = 64
Var
y0, yk, yk1, eps, d: double;
i: integer;
begin
y0 := 0; yk1 := y0;
Write('Введите величину погрешности: ');
Readln(eps);
repeat
yk := (yk1 + 1) / (yk1 + 2);
d := yk - yk1;
if d >= eps then yk1 := yk
until d < eps;
Writeln('yn=', yk)
end.
Тестовое решение:
Введите величину погрешности: 1e-8
yn=0.618033988205325
<span>отдельное предписание исполнителю о выполнении некоторого законченного действия - команда</span>
Зефир без шоколада будет найден 3 тыс. раз (15000-12000=3000), шоколад и зефир будут найдены 8 тыс. раз, значит, шоколад с зефиром и без зефира будет найден 11 тыс. раз. Ответ - 11000.