Форум программистов, компьютерный форум, киберфорум
Maks
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  

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

Запись от Maks размещена 10.11.2024 в 00:12. Обновил(-а) Maks 24.03.2026 в 07:32
Показов 1650 Комментарии 2

В отличие от предыдущего варианта убрал функции, оставив выполнение на клиенте. Добавлены дополнительные функциональные кнопки.

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
60
61
62
63
64
65
66
67
68
69
70
71
72
// Сложение
&НаКлиенте
Процедура Сложить(Команда)
    Число3=Число1+Число2;
КонецПроцедуры
 
// Вычетание
&НаКлиенте
Процедура Вычесть(Команда)
    Число3=Число1-Число2;
КонецПроцедуры
 
// Умножение 
&НаКлиенте
Процедура Умножить(Команда)
    Число3=Число1*Число2;
КонецПроцедуры
 
// Деление
&НаКлиенте
Процедура Разделить(Команда)   
    Если НЕ Число2=0 Тогда
        Число3=Число1/Число2;  
    Иначе 
        Сообщить ("На ноль делить нельзя")
    КонецЕсли;
КонецПроцедуры
 
// Возведение в квадрат
&НаКлиенте
Процедура КвадратЧисла(Команда)
    Если НЕ Число2 Тогда
        Число3=Число1*Число1;
    Иначе
        Число3=Число2*Число2;
    КонецЕсли;
КонецПроцедуры
 
// Квадратный корень
&НаКлиенте
Процедура КвадратныйКорень(Команда)
    Если НЕ Число2 Тогда
        Число3=Sqrt(Число1);
    Иначе 
        Число3=Sqrt(Число2);
    КонецЕсли;
КонецПроцедуры
 
// Очистка полей ввода
&НаКлиенте
Процедура ОчиститьПоля(Команда)
    Число1=0;
    Число2=0;
    Число3=0;
КонецПроцедуры
 
// Вычисление процентов
&НаКлиенте
Процедура Проценты(Команда)
    Результат=Число1/100*Число2;
    Число3=Число1-Результат;
КонецПроцедуры
 
// Инвертирование числа
&НаКлиенте
Процедура ПлюсМинус(Команда)
    Если НЕ Число2 Тогда
        Число1=Число1*-1;
    Иначе
        Число2=Число2*-1;
    КонецЕсли;
КонецПроцедуры
Нажмите на изображение для увеличения
Название: Снимок.JPG
Просмотров: 260
Размер:	76.6 Кб
ID:	9035

Нажмите на изображение для увеличения
Название: Снимок2.JPG
Просмотров: 230
Размер:	14.7 Кб
ID:	9036
Размещено в
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Всего комментариев 2
Комментарии
  1. Старый комментарий
    Аватар для Аватар
    решений дифуров не хватает )
    Запись от Аватар размещена 11.11.2024 в 13:45 Аватар вне форума
  2. Старый комментарий
    Аватар для Maks
    Цитата Сообщение от Аватар
    решений дифуров не хватает )
    Всему свое время
    Запись от Maks размещена 12.11.2024 в 20:21 Maks вне форума
 
Новые блоги и статьи
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru