2.В этом макросе добавляем пункты меню следущим образом: Для каждого пункта меню, создаём "Вложенный макрос". Название каждого вложенного макроса - будет названием пункта меню.
3.В каждом вложенном макросе должна быть хотя бы одна команда. Хотя бы просто "Примечание". Иначе, он в списке не появится.
4.Чтобы вставить разделитель, называем нужный вложенный макрос именем "-" (минус) и добавляем примечание
5.Чтобы сделать быструю кнопку к пункту меню, перед нужной буквой в названии макроса вставляем "&"
6.Ну и естественно, в каждом вложенном макросе реалиуем необходимый функционал либо через макрокоманды, либо через "ЗапускПрограммы"
Объяснение:
m-zolotukhina2
16.08.2021
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018 Внимание! Если программа не работает, обновите версию!
3. Заполнить массив случайными целыми числами (0-10). Найти сумму четных и нечетных значений.
begin var a:=ArrRandom(ReadInteger('n='),0,10); a.Println; var so:=a.Where(t->t.IsOdd).Sum; var se:=a.Where(t->t.IsEven).Sum; Writeln('Сумма четных значений равна ',so,', нечетных ',se) end.
1.Создайте макрос с именем (к примеру) "Моё меню"
2.В этом макросе добавляем пункты меню следущим образом: Для каждого пункта меню, создаём "Вложенный макрос". Название каждого вложенного макроса - будет названием пункта меню.
3.В каждом вложенном макросе должна быть хотя бы одна команда. Хотя бы просто "Примечание". Иначе, он в списке не появится.
4.Чтобы вставить разделитель, называем нужный вложенный макрос именем "-" (минус) и добавляем примечание
5.Чтобы сделать быструю кнопку к пункту меню, перед нужной буквой в названии макроса вставляем "&"
6.Ну и естественно, в каждом вложенном макросе реалиуем необходимый функционал либо через макрокоманды, либо через "ЗапускПрограммы"
Объяснение: