Презентация Виды вычислительных процессов и способы управления последовательностью выполнения программ

Слайд 2

Алгоритмы могут записываться в виде блок-схем (ГОСТ 19427-74 ГОСТ 19428-74) -

Алгоритмы могут записываться в виде блок-схем (ГОСТ 19427-74 ГОСТ 19428-74)


- Ввод

/ Вывод данных
- Альтернатива
(если…)
Процесс (блок линейных вычислений)
- Сортировка
- Процедура
- Пуск
- Останов
Слайд 3

Вычислительный процесс линейного типа Public Sub Гипотенуза() a = InputBox("Введите катет

Вычислительный процесс линейного типа

Public Sub Гипотенуза()
a = InputBox("Введите катет А")
b =

InputBox("Введите катет В")
G = Sqr(a ^ 2 + b ^ 2)
MsgBox "Гипотенуза = " & Gg
End Sub

Начало

Конец

Ввод a, b


Вывод G

Слайд 4

Public Function Гипотенуза(a, b) G = Sqr(a ^ 2 + b

Public Function Гипотенуза(a, b)
G = Sqr(a ^ 2 + b ^

2)
Гипотенуза = G
End Function
Слайд 5

Вычислительный процесс альтернативного типа а) б) в) г)

Вычислительный процесс альтернативного типа

а) б) в) г)

Слайд 6

Оператор выбора If / Then Однострочная форма записи If выражение Then оператор Например: If a

Оператор выбора If / Then

Однострочная форма записи
If выражение Then оператор
Например:
If a<0

Then k=k+1
Слайд 7

Структура If… Then… End If If выражение Then операторы End If

Структура If… Then… End If
If выражение Then
операторы
End If
Например:
If D=0 Then


MsgBox «На ноль делить нельзя!»
Exit Function
End If
Слайд 8

Функция вычисления дисконтного процента, где: n – временной лаг, i –

Функция вычисления дисконтного процента, где: n – временной лаг, i – процентная ставка

в год, s – величина эффекта или затрат ресурса

Function Diskont (s,i,n)
IF n<0 Or i< 0 Then
MsgBox(“ Не может быть!”)
Exit Function
Else: p=s/(1+i)^n
End If
Diskont=p
End Function

Слайд 9

Общий синтаксис If/Then/Else множественные условия IF Условие1 Then [Инструкции1] ElseIf Then [Инструкции2] Else [Инструкции_Else] End IF

Общий синтаксис If/Then/Else множественные условия

IF Условие1 Then
[Инструкции1]
ElseIf Then
[Инструкции2]
Else
[Инструкции_Else]
End

IF
Слайд 10

Public Sub Три_медведя() медведь = InputBox("Какой медведь:ПАПА, МАМА, или МИШУТКА?") If

Public Sub Три_медведя()
медведь = InputBox("Какой медведь:ПАПА, МАМА, или МИШУТКА?")
If медведь =

"ПАПА" Then
MsgBox "Очень страшный"
ElseIf медведь = "мама" Then
MsgBox "Вкусно готовит"
ElseIf медведь = "МИШУТКА" Then
MsgBox "Очень веселый!"
Else
MsgBox "ЭТО НЕ МЕДВЕДЬ!"
End If
End Sub