Контрольная работа по программированию

Контрольная работа по программированию (2 задачи:
Задача 6.98 (б) Гражданин 1 марта открыл счет в банке, вложив 1000руб. Через каждый месяц размер вклада увеличивается на 2% от имеющейся суммы. Определить:
Через сколько месяцев размер вклада превысит 1200руб.
Задача 7.63 Известен рост каждого человека из группы. На сколько рост самого высокого из них превышает рост самого низкого?)
...

Решение:
Начальные установки
А=1000: N=0

Дано: Начальный вклад 1000руб.
Процент увеличения вклада 2%
Найти: Через сколько месяцев вклад превысит 1200руб.
Дополнительно: Пусть А - начальный вклад
N-количество месяцев

Do Until A > 1200 ′ заголовок и условие цикла
A = A + A * 0.02 тело цикла
N = N + 1
Loop ′ завершение цикла
Debug.Print "N ="; N ′ вывод значения N на экран
End Sub ′ завершение процедуры
8)
Задача 7.63 Известен рост каждого человека из группы. На сколько рост самого высокого из них превышает рост самого низкого?
Дано: Рост кажлого участника группы
Найти: Разницу между самым высоким и самым низким участниками
Дополнительно: Пусть А - рост участника
V - рост самого высокого
Р - рост самого низкого
R - разница между самым высоким и самым низким
Возьмем группу из 5 человек. Пусть N - количество человек, тогда N=5
А вводим с клавиатуры. Введем средний рост = 170
Решение:
Начальные установки
V=0: P=0: N=1
1) Вводим условие работы цикла N<=5, за условие берем счетчик количества человек в группе, как только число участников достигает 5 происходит выход из цикла.
2) Вводим рост участников группы – А.
3) Ставим условие А>170. Если А>170, то значение присваиваем переменной V, иначе присваиваем значение переменной P.
4) Выходим из условного оператора и увеличиваем N=N+1
5) Находим разницу в росте R=V-P
6) Выводим на экран R
8)
№п/п
Входные данные
Выходные данные
Пояснение
1
120,140,110,180,190
80
Разница между самым высоким и самым низким участником
начало
V=0:P=0:N=1

T N<=5 F
R= V-P
A