в середовище розробки програмного забезпечення Python створити проект, який відкриває вікно та при натискання правою кнопкою миші по області вікна воно зменшить свої розміри вдвічі і змінить колір фону на зелений, а також: виведе вікно повідомлення з заголовком "Повідомлення" та текстом "Віднови мене". Після подвійному клацанні на області вікна всі зміни скасовуються та виводиться вікно Повідомлення з текстом "Відновлено". Увага! Під час роботи з комп'ютером дотримуйтесь правил безпеки життєдіяльності. Хід виконання 1. Відкрийте середовище розробки програмного забезпечення IDLE та створіть новий файл. 2. Підключити модуль tkіntеr. 3. Викликати модуль messagebox. 4. Створити вікно 5. Надати заголовок створеному вікну. 6. Задати розміри створеному вікну 7. Встановити колір тла створеного вікна 8. Створити першу функцію яка: а) зменшить розміри вікна вдвічі б) встановить зелений колір фону вікна в) виведе вікно Повідомлення "Повідомлення" та текстом "Віднови мене" 9. Створити другу функцію яка: а) відновить розміри вікна б) встановити попередній колір фону вікна в) виведе вікно Повідомлення заголовKOM "Повідомлення" та текстом "Відновлено" 10. Методом bind створити Подію з викликом першої функції 11. Методом bind Створити Подію з викликом другої функції 3 заголовком 3
2) Номер страницы 3) Библиотечный каталог — совокупность расположенных по опр-м правилам библиографических записей на документы, раскрывающих состав и содержание фонда библиотеки или информационного центра. 4) Жёсткий диск 5) Полное имя может включать следующее: протокол или доступа имя или адрес компьютера, узла сети устройство хранения, диск путь к каталогу собственно имя файла, которое может содержать его расширение версия или номер ревизии 6) Область поиска - область памяти, в пределах которой осуществляется поиск
1) begin var a:=ArrRandom(ReadInteger('n='),20,79); a.Println; var x:=a.Where(t->t.IsEven).Count; If x>0 then Println('Количество четных:',x) else Println('Четных нету'); var y:=a.Where(t->t mod 10=6).Count; If y>0 then Println('Количество оканч. на 6:',y) else Println('Оканч. на 6 нету'); end.
Пример: n= 5 79 29 27 74 27 Количество четных: 1 Оканч. на 6 нету
2) begin var a:=ArrRandom(10,0,100); a.Println; Println('Кол-во пар:',Range(0,8,2).Where(t->a[t]=a[t+1]).Count) end.
