База данных "железнодорожные кассы" ориентировочные таблицы: "продажи", "посадочные места", "направления". решить нужно 80 ! решить с access

Персональный компьютер, ПК (англ. personal computer, PC), ПЭВМ (персональная электронно-вычислительная машина) — настольная микро-ЭВМ, имеющая эксплуатационные характеристики бытового прибора и универсальные функциональные возможности[1].

Согласно ГОСТ 27201-87 ПК применяются как средства массовой автоматизации (в основном для создания на их основе автоматизированных рабочих мест) в социальной и производственных сферах деятельности в различных областях народного хозяйства и предназначенные для пользователей, не обладающих специальными знаниями в области вычислительной техники и программирования.

Изначально компьютер был создан как вычислительная машина, в качестве ПК он так же используется в других целях — как средство доступа в информационные сети и как платформа для компьютерных игр.

Вот на Pascal (Console Aplication) :
var   
  a:Integer;
begin 
Writeln('Vvedite nominal valuti'); 
Readln(a); 
case (a mod 10) of   
1:   
if (a=11) then     
Writeln('Y Vas est ',a,' rublei')   
else   
begin     
Writeln('Y Vas est ',a,' rubl');   
end;
2,3,4:   
if (a=12) or (a=13) or (a=14) then   
Writeln('Y Vas est ',a,' rublei')   
else   
begin   
Writeln('Y Vas est ',a,' rublya');   
end;
0,5,6,7,8,9:   
if (a=15) or (a=16) or (1=17) or (a=18) or (a=19) then   
Writeln('Y Vas est ',a,' rublei')   
else   
begin   
Writeln('Y Vas est ',a,' rublei');   
end; 
end;
Readln;
end.