Составить программу, решающую следующую задачу: Дано трехзначное число. Найти произведение его первой и второй цифры.
Var n,p:integer;
begin
write(n = ); readln(n);
p:=(n div 100)*(n div 10 mod 10);
writeln(p = ,p);
end.
Пример:
n = 374
p = 21
Оцени ответ
