ПЕРВОЕ ВЫСШЕЕ ТЕХНИЧЕСКОЕ УЧЕБНОЕ ЗАВЕДЕНИЕ РОССИИ



МИНИСТЕРСТВО НАУКИ И ВЫСШЕГО ОБРАЗОВАНИЯ
РОССИЙСКОЙ ФЕДЕРАЦИИ

федеральное государственное бюджетное образовательное учреждение

высшего образования

САНКТ-ПЕТЕРБУРГСКИЙ ГОРНЫЙ УНИВЕРСИТЕТ

Кафедра информатики и компьютерных технологий

ЛАБОРАТОРНАЯ РАБОТА № 1

Вариант 8

Программирование разветвляющего процесса в VBA.

Выполнил: студент гр. ГК-22 Сломова Е.Д.

^{(шифр группы) (подпись) (Ф.И.О.)}

Дата: 04.04.2023 г.

Проверил

руководитель практики: доцент Глазков В.В.

^{(должность) (подпись) (Ф.И.О.)}

Санкт-Петербург 2023

Задача 1. Составить программу начисления стипендии студенту в зависимости от среднего балла. Если средний балл >1.5 то стипендия 2000 руб; если средний бал находиться в пределах [3.5 ;4.5] то 1500; в остальных случаях стипендии нет. Исходные данные прочитать из ячейки В3, а стипендию вывести в диалоговом окне.

Решение:

Результаты вычисления с помощью VBA по условиям задачи номер один при различных значениях х показаны на рисунках (см. Рисунок 1.1; 1.2; 1.3)



Рис. 1. Результаты вычисления по задаче №1.1



Рис. 2. Результаты вычисления по задаче №1.2



Рис. 3. Результаты вычисления по задаче №1.3

---

Смотрите также файлы

• 1. Этиология.doc

• Лабораторная работа 1 Вариант 9 Вычисления в vba студент гр. Изб222 Талигин Г. Я.docx

• 1. Структура управления сервисного локомотивного депо Батайск.docx

• Пні аза тілі Кні Мектеп 60жббом малім.docx

• Практическая работа 1 к разделу 1 Ценности и их роль для человека и общества Знакомство с порталом Единое содержание образования.docx