§ 20. Вправа 2. Сума цифр. Завдання. У середовищі програмування Lazarus розробіть проект Суматор, у якому після натиснення кнопки Старт у вікні введення даних слід ввести трицифрове ціле число. Після чого у вікно повідомлення буде виводитися сума його цифр. 1. Сплануйте проект. Передбачте, які об'єкти будуть використані на екранній формі та які події будуть відбуватися з ними. 2. У папці Навчальні проекти власної структури папок створіть папку Суматор. Виконайте інші дії підготовчого етапу розробки проекту. 3. У вікні дизайнера форми середовища Lazarus додайте об'єкт – кнопка, надайте значенням властивості Caption: Старт. 4. Створіть процедуру опрацювання події: натиснуто кнопку Старт. Опишіть змінні величини, які будуть використовуватися (табл. 20.6). 5. Запишіть команду введення значення для змінної chislo: chislo:= StrToInt(InputBox('Введення числа, 'Введіть трицифрове число:', ' ')); 6. Проаналізуйте та введіть програмний код виділення цифр числа: dig1:=chislo div 100; chislo:= chislo - dig1 * 100; dig2:=chislo div 10; dig3:= chislo-dig2 * 10; s:= dig1 + dig2 + dig3; 7. Додайте до програмного коду команду створення вікна повідомлення: MessageDlg(IntToStr(s), mtInformation, [mbOk], 0); 8. Запустіть проект на виконання. Перевірте для введеного числа 732, ви маєте отримати результат 12. 9. Завершіть роботу з проектом і середовищем програмування. Завантажити текст практичного завдання у форматі docx: https://goo.gl/buJnRm