не могу справиться с составлением программы на нахождение наибольшего

[Kseniya]

Уважаемые программисты!
Я недавно начала изучать информатику и у меня никак не получается составить программы для нахождение наибольшего и наименьшего делителя натурального числа (две разных программы) в visual basic

надеюсь на вашу помощь

 

[andrey24]

Жесть )))

Dim max as integer
Dim min as integer
Dim chisla(5) as integer
'Допустим у нас есть какой-то массив чисел chisla(5)

min=chisla(0)
max=chisla(0)

for i=0 to 5
if min > chisla(i) then min=chisla(i)
if max < chisla(i) then max=chisla(i)
next

'таким образом на выходе мы имеем максимальное число (max) из массива (chisla) и минимальное (min)