Есть ответ 👍

Необходимо перевести Робота из начального положения (◊) в точку A, закрашивая при этом указанные клетки поля. Размеры стен и расстояние между ними могут быть произвольны нц-пока-кц

199
483
Посмотреть ответы 1

Ответы на вопрос:

vladgubin78
4,5(97 оценок)

Program ryad; var a,i: integer; b: real; begin writeln('vvelbnt "n"'); readln(a); if (a mod 2) = 0 then writeln('chislo "n" dollno nut chetnuym') else begin         b: =0;         i: =3;         repeat                 b: =b+(1/i);                 i: =i+2;         until i=a; writeln('s=',b); end; readln; end.

Популярно: Информатика