Составьте список вещей, которые вы хотели чтобы ваш робот делал по дому.

Мыл посуду, прибирался, гладил и стирал бельё, готовил еду, делал т.д.

Стирал, убирал и готовил.

          чертишь координатные оси   , рисуешь круг с радиусов в 2 единичных отрезка , где нибудь т.x и т. y , т. r внутри круга или на ободе круга , тобишь где прямая с осью имеет общую точку и начинаешь искать всё по моей схеме .                                                                                                           ι             ι                                                     ιначалоι                                                     ιι                                                         ι                                                         ι                                                                                                 ιопределениеι                                                 ι       окна        ι                                                 ι ι                                                         ι                                                         ι                                                 ι                                               /                   /                                               /ввод x,y,r/                                             //                                                           ι                                                           ι                                                 ι                                               /       /                                               /   рисунка  /                                             //                                                           ι                                                           ι                                 условие да                                      ι                                               ι                                     ι                                               ι                             1 действие                               2 действие                                   ι                                               ι                                     ιι                                                           ι                                                           ι                                                                                           /                         /                                             /   вывод x,y,r  /                                            / /                                                           ι                                                           ι                                                                                              (       конец       )                                                 ⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻

Const k = 10; var a,b: array[1..k] of integer; i,n: integer; begin n: =1; writeln('кол-во тракторов: '); write('по плану: '); for i: = 1 to k do       begin       a[i]: =random(21);       b[i]: =random(21);       if a[i]> b[i] then n: =n+1;       write(a[i]: 2,' ');       end; writeln; write('по факту: '); for i: = 1 to k do       write(b[i]: 2,' '); writeln; writeln(n,' - стольки колхозам недопоставили трактора.'); end.