Петя пригласил витю в гости, сообщил ему адрес, но решил сообщить код от подъезда в виде : дана последовательность из 4 цифр без пробелов, нужно все цифры больше 5 разделить на 2 (при необходимости отбросить остаток), а потом удалить из полученной последовательности все четные цифры нужно составить программу! !

«Объект-заместитель» принято называть моделью, а исходный объект - прототипом или оригиналом.
• модель не является точной копией объекта-оригинала: она отражает только часть его свойств, отношений и особенностей поведения
• любая модель всегда отражает только часть признаков оригинала, можно создавать и использовать разные модели одного и того же объекта

Модель — это объект, который используется в качестве «заместителя», представителя другого объекта (оригинала) с определенной целью.

Модели используются человеком для:
• представления материальных предметов
• объяснения известных фактов
• проверки гипотез и получения новых знаний об исследуемых объектах
• прогнозирования
• управления
---
Пример:
Исходный объект: медведь
Объект-заместитель: плюшевый мишка
Свойство: внешний облик
---
p.s. Если найдутся умные люди, которые решат отметить это нарушением, то говорю сразу, что это не материал, который нужно сочинять, а доступная информация в любом учебнике или справочнике.

        '     1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).    
   
Dim a As Integer
Dim b As Integer 
Dim i As Integer   

a = InputBox("Введите а") 
b = InputBox("Введите b")
   
Dim msg As String     
msg = ""   
     
For i = a To b     
       msg = msg &  3 в степени " & i & " равно " & 3 ^ i & vbCrLf   
 Next   

MsgBox(msg)

2)Найти все делители числа 1204.   

Dim i As Integer       
Dim msg As String   
msg = ""     

For i = 1 To 1204 
          If 1204 Mod i = 0 Then     
                  msg = msg & "Число " & i & " является делителем 1204." & vbCrLf                  End If   
Next 
  MsgBox(msg)