Составить программу, решающую следующую задачу: Дано трехзначное число. Найти произведение его первой и второй цифры.
Ответы на вопрос
Ответил petyaGavrikov
0
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
begin
write('n = '); readln(n);
p:=(n div 100)*(n div 10 mod 10);
writeln('p = ',p);
end.
Пример:
n = 374
p = 21
Ответил fmech
0
Извени не то поставил
Новые вопросы