Составьте программу ,которая запрашивает количество карандашей и их цену, количество тетрадей и их цену,а выводит стоимость всех карандашей, тетрадей и всей покупки в целом.

Var a, b, c, e : integer;beginwriteln('Кол-во карандашей:');readln(a);writeln('Цена карандашей:');readln(b);writeln('Кол-во тетрадий:');readln(c);writeln('Цена тетрадий:');readln(e);writeln('Стоимость карандашей: ', a*b);writeln('Стоимость тетрадий: ', c*e);writeln('Стоимость покупки: ', c*e + a*b);end.