На самом деле это не сложно. Информатика в школе - это вообще несложно. Поверь. Вот смотри, в условии - числа не больше 18 и не меньше 18, то есть 18 мы можем использовать и там и там. Тогда 18 будет в клетке (3;3), а остальные числа располагаем по условие, те, что меньше 18 по горизонтали, а те что больше 18 по вертикали.
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
Ответ на картинке,решали уже мы это
2. Windows, Mac OS, Linux
3. Ноутбуки MacBook Pro, MacBook Air, MacBook, настольные компьютеры Mac Pro, iMac, моноблок iMac Pro
4. Системы Linux являются основными для суперкомпьютеров и серверов, расширяется применение их для встраиваемых систем и мобильных устройств, некоторое распространение системы получили и для персональных компьютеров.
5. Android, iOS
6. CyanogenMod
7. Android
Подписала решение на рисунках. (см. ниже)