Составить программу, решающую следующую задачу: Дано трехзначное число. Найти произведение его первой и второй цифры.

Извени не то поставил

var n,p:integer;beginwrite('n = '); readln(n);p:=(n div 100)*(n div 10 mod 10);writeln('p = ',p);end.Пример:n = 374p = 21