Ответ:
<span>В.появление сложных внешних устройств и необходимость разделения ресурсов между задачами и пользователями</span>
Var a, b, c, S1, fin: integer;
S1 := edit1.text;
a := copy(S1,1,1);
b := copy(S1,2,1);
c := copy(S1,3,1);
fin := a + b + c;
edit2.text := fin;
На нажатие кнопки добавить код.
все решения происходят в мозговом центре
Во вложении
--------------------------------
1. Узнать какие сегодня уроки
2. Достать нужные принадлежности и пенал
3. Достать портфель
4. Открыть портфель
5.Положит эти принадлежности в портфель
6. Закрыть портфель
7. Все перепроверить и убедится, что взято