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

Материал из ТХАБ.РФ
Перейти к: навигация, поиск
(Новая страница: «== Перфо. Примеры == * Перфо. Пример 1 * Перфо. Пример 2 * Перфо. Пример 3 * [[Перфо - Списки]…»)
 
м
Строка 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]]

Версия 18:41, 27 октября 2020

  1. Область "Проверка установки значения переменной"

//создадим переменную (Перем ф 5) (Вывод ф пс) //установим ей новое значение' (уст ф 99) (Вывод ф пс)

  1. КонецОбласти

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

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

//добавим в коллекцию значение (ф.Добавить "Добавленное значение") //проверим вызов свойства с параметром //получим только что добавленное значение (Вывод (ф.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 куб)

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