Пример программы на языке Visual Basic для вывода на экран всех простых чисел, не превышающих заданного N, с использованием массивов: 1

n = cint(InputBox('N='))Redim X(n)for i=0 to n X(i)=inextfor i=2 to n  for j=i+1 to n    if j mod i = 0 then X(j)=0  nextnextres=''for i=2 to n  if X(i)<>0 then res=res+' '+Cstr(X(i))nextMsgBox res

Для решения задачи необходимо организовать перебор всех чисел заданного диапазона в цикле и проверку каждого числа на простоту. 4