Помогите с задачей по информатике прошу вас. Срочно. На паскале или на C++. Желательно все-таки на паскале
Ограничение времени 1 секунда
Ограничение памяти 64Mb
Ввод стандартный ввод или input.txt
Вывод стандартный вывод или output.txt
Даны два числа A и B (0<=A,B<=100000). Напишите программу нахождения произведения числа А на все цифры числа В. Входной файл input.txt содержит два числа A и B. В выходной файл output.txt вывести одно число – произведение числа А на все цифры числа В.
Ввод 3 33
Вывод 27
Answers & Comments
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadInteger2;
if b=0 then Writeln(0)
else begin
var p:int64:=a;
while b>0 do begin
p*=b mod 10;
b:=b div 10
end;
Writeln(p)
end
end.
Пример
2342 8945923
182113920