Ответы
Ответ дал:
0
Program proga;
var a:integer;
Begin
readln(a);
writeln((a div 1000) * (a mod 1000 div 100) * (a mod 1000 mod 100 div 10) * (a mod 1000 mod 100mod 10));
end.
var a:integer;
Begin
readln(a);
writeln((a div 1000) * (a mod 1000 div 100) * (a mod 1000 mod 100 div 10) * (a mod 1000 mod 100mod 10));
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад