Простейший калькулятор - вариант №1

Запись от Maks размещена 09.11.2024 в 18:06. Обновил(-а) Maks 24.03.2026 в 22:24

Показов 1583 Комментарии 0

Метки 1с, бсп, калькулятор

Калькулятор в конфигурации БСП.

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
// Сложение
&НаКлиенте
Процедура Сложить(Команда)
    Число3=Число1+Число2;
КонецПроцедуры
 
// Вычетание 
&НаКлиенте
Процедура Вычесть(Команда)
    Число3=Число1-Число2;
КонецПроцедуры
 
// Умножение
&НаКлиенте
Процедура Умножить(Команда)
    Число3=Число1*Число2;
КонецПроцедуры
 
// Деление 
&НаКлиенте
Процедура Разделить(Команда)   
    Если НЕ Число2=0 Тогда
        Число3=Число1/Число2;  
    Иначе 
        Сообщить ( "На ноль делить нельзя")
    КонецЕсли;
КонецПроцедуры
 
// Возведение в квадрат
&НаСервереБезКонтекста
Функция КвадратЧислаНаСервере(Число1,Число2)
    Если НЕ Число2 Тогда
        Результат=Число1*Число1;
    Иначе
        Результат=Число2*Число2;
    КонецЕсли;
    Возврат Результат;
КонецФункции
 
&НаКлиенте
Процедура КвадратЧисла(Команда)
    Число3=КвадратЧислаНаСервере(Число1,Число2);
КонецПроцедуры
 
// Квадратный корень
&НаСервереБезКонтекста
Функция КвадратныйКореньНаСервере(Число1,Число2)
    Если НЕ Число2 Тогда
        Результат=Sqrt(Число1);
    Иначе 
        Результат=Sqrt(Число2);
    КонецЕсли;
    Возврат Результат;
КонецФункции
 
&НаКлиенте
Процедура КвадратныйКорень(Команда)
    Число3=КвадратныйКореньНаСервере(Число1,Число2);
КонецПроцедуры

Нажмите на изображение для увеличения
Название: Снимок.JPG
Просмотров: 270
Размер: 65.3 Кб
ID: 9033

Метки 1с, бсп, калькулятор

Размещено в 1С

« Шпаргалка по установке сервера Zabbix 5 на Ubuntu 20.04 Главная страница Простейший калькулятор - вариант №2 »

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

Всего комментариев 0

Комментарии

Maks

Регистрация 13.03.2013
Адрес Тюменская область
Сообщений 18,753
Записей в блоге 50

Новые блоги и статьи Все статьи Все блоги /
[golang] Двоичная куча, min-heap alhaos 20.05.2026 Двоичная куча Двоичная куча — структура данных, которая всегда держит самый важный элемент наготове. Представьте очередь к хилеру в игре, и очередь из игроков в приоритете те у кого меньше. . .	[golang] Breadth-First Search alhaos 19.05.2026 BFS (Breadth-First Search) — это базовый алгоритм обхода графа в ширину, который поуровнево исследует все связанные вершины. Он начинает с выбранной точки и проверяет всех соседей, прежде чем. . .	[golang] Алгоритм «Хак Госпера» alhaos 17.05.2026 Алгоритм «Хак Госпера» Хак Госпера (Gosper's Hack) — алгоритм нахождения следующего по величине числа с тем же количеством установленных бит. Придуман Биллом Госпером в 1970-х, опубликован в. . .	Рисование бинарного древа до 6-го колена на js, svg. russiannick 17.05.2026 <svg width="335" height="240" viewBox="0 0 335 240" fill="#e5e1bb"> <style> <!]> </ style> <g id="bush"> </ g> </ svg> function fn(){ let rost;/ / высота древа let xx=165,yy=210,w=256;
FSharp: interface of module DevAlt 16.05.2026 Интерфейс модуля F# позволяет управлять доступностью членов, содержащихся в реализации модуля. По-умолчанию все члены модуля доступны: module Foo let x = 10 let boo () = printfn "boo" . . .	Хитросплетение родственных связей пантеона греческих богов. russiannick 14.05.2026 Однооконник, позволяющий узреть и изучить отдельных героев древней Греции. <!DOCTYPE html> <html lang="ru"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible". . .	[golang] Угол между стрелками часов alhaos 12.05.2026 По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .	Debian 13: Установка Lazarus QT5 ВитГо 09.05.2026 Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .

Наверх

Сообщение форума

Отменить изменения