Перфо. Пример 3 — различия между версиями

Материал из ТХАБ.РФ
Перейти к: навигация, поиск
(Новая страница: «== Перфо. Примеры == * Перфо. Пример 1 * Перфо. Пример 2 * Перфо. Пример 3 * [[Перфо - Списки]…»)
 
м
 
(не показана 1 промежуточная версия 1 участника)
Строка 1: Строка 1:
 +
 +
#Область "Проверка установки значения переменной"
 +
  //создадим переменную
 +
    (Перем ф 5)
 +
    (Вывод ф пс)
 +
  //установим ей новое значение'
 +
    (уст ф 99)
 +
    (Вывод ф пс)
 +
#КонецОбласти 
 +
 +
//проверим установку свойства общего для класса"
 +
  (Уст Консоль.Заголовок "Перфо // супер-просто!!!")
 +
 +
//создадим новую коллекцию массив
 +
  (перем ф (новый массив))
 +
  (Вывод ф пс)
 +
 +
//добавим в коллекцию значение
 +
  (ф.Добавить "Добавленное значение")
 +
//проверим вызов свойства с параметром
 +
//получим только что добавленное значение
 +
  (Вывод (ф.Item 0) пс)
 +
 +
//проверим установку значения свойству с параметорм
 +
  (уст ф.Item 0 "Установленное значение")
 +
//проверим, что значение установилось
 +
  (Вывод (ф.Item 0) пс)
 +
 +
//то же самое с помощью методов Получить/Установить
 +
  (ф.Установить 0 "Установленное значение методом")
 +
//проверим, что значение установилось
 +
  (Вывод (ф.Получить 0) пс)
 +
 +
//проверим команду Пуск
 +
  (Пуск "Net" "View" (. (Новый СистемнаяИнформация) ИмяКомпьютера))
 +
  (Вывод ПС "----------------------------" ПС)
 +
  (Пуск "cmd" "/c" "dir")
 +
  (Вывод ПС "----------------------------" ПС)
 +
  (Пуск "ping" "promcod.com.ua")
 +
 +
//многострочная строка
 +
  (Вывод "это первая строка текста //это не комментарий, а все еще первая строка текста
 +
  это вторая строка текста
 +
  это третья строка текста" //а тут ошибка, тут нельзя комментарий!!!
 +
  пс)
 +
  (Перем МояСтрока "Перфо // супер-просто!!!")
 +
  (Вывод МояСтрока ПС) 
 +
 +
//тут самое интересное это ((перем Чис 4) Чис)
 +
//мы на лету создаем переменную Чис со значение 4 и тут же извлекаем ее значение для использования
 +
  (Вывод (+ 3 ((перем Чис 4) Чис) 5) пс)
 +
 +
//создадим функцию, которая может заданное количество раз повторить вызов другой функции
 +
  (функция(повторить ЧислоПовторов ВызываемаяФункция)
 +
    (если (> ЧислоПовторов 0)
 +
        ((ВызываемаяФункция)
 +
            (повторить (- ЧислоПовторов 1) ВызываемаяФункция))))
 +
//проверим её
 +
(функция (Вывести-Один) (вывод "1-"))
 +
(функция (Вывести-Привет) (вывод "Привет-"))
 +
(повторить 3 Вывести-Один) // 3 раза выведет на экран "1-"
 +
(Вывод пс)
 +
(повторить 5 Вывести-Привет) // 5 раз выведет на экран "Привет-"
 +
(Вывод пс)
 +
           
 +
//создадим две анонимных функции
 +
//и сохраним их в переменные квадрат и куб
 +
(перем квадрат (функ (ф) (* ф ф))) 
 +
(перем куб (функ (ф) (* ф ф ф)))
 +
//создадим функцию для построения графика
 +
(функция (график НачИнтервала КонИнтервала ФункцияГрафика)
 +
    (Для (Инд НачИнтервала КонИнтервала)
 +
    (Вывод "х=" Инд " у=" (ФункцияГрафика Инд) "; ")
 +
    )
 +
    (Вывод пс)
 +
)
 +
//строим график функции квадрат
 +
  (график 1 4 квадрат)
 +
//строим график функции куб
 +
  (график -3 3 куб)
 +
 
== Перфо. Примеры ==
 
== Перфо. Примеры ==
 
* [[Перфо. Пример 1]]
 
* [[Перфо. Пример 1]]

Текущая версия на 20:10, 17 ноября 2020

#Область "Проверка установки значения переменной"
  //создадим переменную
    (Перем ф 5)
    (Вывод ф пс)
  //установим ей новое значение'
    (уст ф 99)
    (Вывод ф пс)
#КонецОбласти  

//проверим установку свойства общего для класса"
 (Уст Консоль.Заголовок "Перфо // супер-просто!!!") 

//создадим новую коллекцию массив
 (перем ф (новый массив))
 (Вывод ф пс)

//добавим в коллекцию значение
  (ф.Добавить "Добавленное значение")
//проверим вызов свойства с параметром
//получим только что добавленное значение
  (Вывод (ф.Item 0) пс)

//проверим установку значения свойству с параметорм
 (уст ф.Item 0 "Установленное значение")
//проверим, что значение установилось
  (Вывод (ф.Item 0) пс)

//то же самое с помощью методов Получить/Установить
  (ф.Установить 0 "Установленное значение методом")
//проверим, что значение установилось
  (Вывод (ф.Получить 0) пс)

//проверим команду Пуск
 (Пуск "Net" "View" (. (Новый СистемнаяИнформация) ИмяКомпьютера))
 (Вывод ПС "----------------------------" ПС)
 (Пуск "cmd" "/c" "dir")
 (Вывод ПС "----------------------------" ПС)
 (Пуск "ping" "promcod.com.ua")

//многострочная строка
  (Вывод "это первая строка текста //это не комментарий, а все еще первая строка текста
  это вторая строка текста
  это третья строка текста" //а тут ошибка, тут нельзя комментарий!!!
  пс)
  (Перем МояСтрока "Перфо // супер-просто!!!") 
  (Вывод МояСтрока ПС)  

//тут самое интересное это ((перем Чис 4) Чис)
//мы на лету создаем переменную Чис со значение 4 и тут же извлекаем ее значение для использования
 (Вывод (+ 3 ((перем Чис 4) Чис) 5) пс)

//создадим функцию, которая может заданное количество раз повторить вызов другой функции
 (функция(повторить ЧислоПовторов ВызываемаяФункция)
    (если (> ЧислоПовторов 0)
        ((ВызываемаяФункция)
            (повторить (- ЧислоПовторов 1) ВызываемаяФункция))))
//проверим её
(функция (Вывести-Один) (вывод "1-"))
(функция (Вывести-Привет) (вывод "Привет-"))
(повторить 3 Вывести-Один) // 3 раза выведет на экран "1-"
(Вывод пс)
(повторить 5 Вывести-Привет) // 5 раз выведет на экран "Привет-"
(Вывод пс)
           
//создадим две анонимных функции 
//и сохраним их в переменные квадрат и куб
(перем квадрат (функ (ф) (* ф ф)))  
(перем куб (функ (ф) (* ф ф ф)))
//создадим функцию для построения графика
(функция (график НачИнтервала КонИнтервала ФункцияГрафика) 
   (Для (Инд НачИнтервала КонИнтервала)
   	(Вывод "х=" Инд " у=" (ФункцияГрафика Инд) "; ")	
   ) 
   (Вывод пс)
)
//строим график функции квадрат
  (график 1 4 квадрат)
//строим график функции куб
  (график -3 3 куб)

Перфо. Примеры

Источник — «https://xn--80ac3cm.xn--p1ai/index.php?title=Перфо._Пример_3&oldid=8441»