Составить алгоритм и код программы вычисляющей итоговую стоимость со скидкой по температуре на улице и стоимости покупки. Бесплатный доступ к контрольной работе

Реферат.Справочник
Контрольные работы по информатике
Составить алгоритм и код программы вычисляющей итоговую стоимость со скидкой по температуре на улице и стоимости покупки

Составить алгоритм и код программы вычисляющей итоговую стоимость со скидкой по температуре на улице и стоимости покупки .pdf

Зарегистрируйся в 2 клика в Кампус и получи неограниченный доступ к материалам с подпиской Кампус+ 🔥

Условие

Составить алгоритм и код программы, вычисляющей итоговую стоимость со скидкой по температуре на улице и стоимости покупки: В магазине обуви сезонная распродажа. При стоимости товара до 1200 рублей и: 1. температура на улице ниже нуля – скидка 40% 2. температура на улице выше нуля, но ниже +10 – скидка 30% 3. температура на улице выше +10 – скидка 20% При стоимости товара от 1200 до 2500 рублей и: 1. температура на улице ниже нуля – скидка 30% 2. температура на улице выше нуля, но ниже +10 – скидка 20% 3. температура на улице выше +10 – скидка 10% При стоимости товара от 2500 рублей и: 1. температура на улице ниже нуля – скидка 20% 2. температура на улице выше нуля, но ниже +10 – скидка 10% 3. температура на улице выше +10 – скидка 5%

Решение

Потяни, чтобы посмотреть

Алгоритм:
Программа:
Module Module1
Sub Main()
Dim temp, cost As Integer
temp = InputBox("Введите температуру")
cost = InputBox("Введите стоимость")
If cost < 1200 Then
If temp <= 0 Then
cost *= 0.6
ElseIf temp > 0 And temp <= 10 Then
cost *= 0.7
Else
cost *= 0.8
End If
ElseIf cost >= 1200 And cost < 2500 Then
If temp <= 0 Then
cost *= 0.7
ElseIf temp > 0 And temp <= 10 Then
cost *= 0.8
Else
cost *= 0.9
End If
Else
If temp <= 0 Then
cost *= 0.8
ElseIf temp > 0 And temp <= 10 Then
cost *= 0.9
Else
cost *= 0.95
End If
End If
MsgBox("cost = " & cost)
End Sub
End Module

50% задачи недоступно для прочтения

Переходи в Кампус, регистрируйся и получай полное решение

Получить задачу