Помогите написать лёгкую программу

[Машенька]

мне задали, а я не понимаю ничего в програмировании, помогите пожалуйста

Написать программу вычисления стоимости покупки, состоящей из нескольких тетрадей и карандашей.
Вычисление стоимости покупки.
Введите исходные данные:
Цена тетради (руб.)? 2.75
Количество тетрадей? 5
Цена карандаша (руб.)? 0.85
Количество карандашей? 2
Стоимость покупки: 15.45 руб.
Заранее огромное спасибо!!!

[unicode]

program Project1;
var
tetrad, karandash, suma: real;
ntetrad, nkarandash: integer;
begin
writeln('Введите исходные данные:');
writeln('Цена тетради (руб.) - ', tetrad);
readln(tetrad);
writeln('Количество тетрадей - ', ntetrad);
readln(ntetrad);
writeln('Цена карандаша (руб.) - ', karandash);
readln(karandash);
writeln('Количество карандашей - ', nkarandash);
readln(nkarandash);
suma:=(tetrad*ntetrad)+(karandash*n karandash);
writeln('Стоимость покупки - ', suma:6:2);
readln;
end.

[Машенька]

СПАСИБООООООООООООООООООООООООООООО
вообще круть