Впаскале abc. написать программу для расчета покупки карандашей и ручек. надо,

Program z;
var
 n,a,s:integer;
begin
n:=20; //Стоимость ручки
Writeln('Сколько ручек вы хотите купить?');
readln(a);
s:=n*a;
writeln('Стоимость покупки ',s,' руб');
end.