(QBasic) Задача с Массивами.

[Jlovenpk1]

Результаты переписи населения хранятся в памяти ЭВМ. Используя массивы фамилий и года рождения напечатать фамилии и подсчитать общее число жителей, родившихся раньше 1928 года.

Примерный код, как я думаю:
cls
print " zadanie 1"
input "vvedite znachenie";a$,B$
c=1928
while a$ <= c then
print " error"
А дальше, а дальше не знаю и вообще правильный ли код..
Поможете?)

[Jlovenpk1]

up up up up up

[Jlovenpk1]

up up up up up

[Jlovenpk1]

up up up up up

[Новичок!]

while a$ <= c then
print " error"

Ваш код это бред. Нельзя сравнивать массив и число.
Вот примерный код :

'количество жителей в массиве и вводим данные в массив
i=10
dim gi(i)
for j=0 to i
input a(j)
next
'в цикле проверяем год рождения
kolichestvo=0
for j= 0 to i
if a(j) <1928 then 
kolichestvo=kolichestvo+1
end if
next
print kolichestvo