Переменные — контейнеры для хранения изменяемых данных. Без них не обходится практически ни одна программа. Для переменную можно сравнить с номерком в гардеробе — вы сдаете в "гардероб" какие-то данные, в ответ вам выдается номерок. Когда вам опять потребовались эти данные, вы "предъявляете номерок" и получаете их. Пример работы с переменными в VBA может выглядеть так:
Dim nMyAge As Integer
nMyAge = nMyAge + 10
MsgBox nMyAge
Перед работой с переменной настоятельно рекомендуется ее объявить. Объявление переменной в нашем примере выглядит так:
Dim nMyAge As Integer
Как расшифровать эту строку:
Dim — это область видимости переменной. В VBA предусмотрено 4 ключевых слова для определения области видимости переменных:
Привет
Объяснение:
Присвоєння (англ. assignment) — механізм в програмуванні, що дозволяє динамічно змінювати зв'язки об'єктів даних (зазвичай, змінних) з їхніми значеннями. Строго кажучи, зміна значень є побічним ефектом операції присвоєння, і в багатьох сучасних мовах програмування сама операція також повертає певний результат (як правило, копію присвоєного значення). На фізичному рівні результат операції присвоєння полягає в проведенні запису і перезапису фрагментів пам'яті або регістрів процесора.
Присвоєння — одна з центральних конструкцій в імперативних мовах програмування, ефективно реалізується на фон-Нейманівській архітектурі, яка лежить в основі сучасних комп'ютерів.
В логічному програмуванні прийнято інший, алгебраїчний підхід. Звичайного («деструктивного») присвоєння тут немає. Існують тільки невідомі, які ще не обчислені, і відповідні ідентифікатори для позначення цих невідомих. Програма тільки визначає їхні значення, самі вони сталі. Звичайно, в реалізації програма робить запис в пам'ять, але мови програмування цього не відображають, даючи програмісту можливість працювати з ідентифікаторами постійних значень, а не зі змінними.
В чистому функційному програмуванні не використовують змінні, тому явний оператор присвоєння не потрібен.
a:array[1..12]of real;
i:integer;
s1,s2,s3,s4:real;
begin
for i:=1 to 12 do
begin
writeln('Введите среднемесячную температуру за ',i,' месяц:');
read(a[i]);
if i<=3 then s1:=s1+a[i] else
if (i>3)and(i<=6) then s2:=s2+a[i] else
if (i>6)and(i<=9) then s3:=s3+a[i] else
s4:=s4+a[i];
end;
writeln('Средняя температуры зимних месяцев: ',s1/3);
writeln('Средняя температуры весенних месяцев: ',s2/3);
writeln('Средняя температуры летних месяцев: ',s3/3);
writeln('Средняя температуры осенних месяцев: ',s4/3);
end.