Предмет: Информатика, автор: vipsarur

Помогите с задачей по информатике прошу вас. Срочно. На паскале или на C++. Желательно все-таки на паскале
Ограничение времени 1 секунда
Ограничение памяти 64Mb
Ввод стандартный ввод или input.txt
Вывод стандартный вывод или output.txt

Даны два числа A и B (0<=A,B<=100000). Напишите программу нахождения произведения числа А на все цифры числа В. Входной файл input.txt содержит два числа A и B. В выходной файл output.txt вывести одно число – произведение числа А на все цифры числа В.

Ввод 3 33
Вывод 27

Ответы

Автор ответа: danulpopov
0
var
a,b:int64;
Begin
Read(a, b);
 if b = 0 then Writeln(0)
  else begin
    While b > 0 do begin
      a:= a * (b mod 10);
      b:= b div 10;
    end;
Writeln(a);
end;
end.

Автор ответа: Аноним
0
Июо как для набора 3 0 Ваша программа возвращает... 3 - еще одна ошибка.
Автор ответа: Аноним
0
*Ибо
Автор ответа: Аноним
0
... и после внесения двух исправлений наши программы стали близнецами)))
Автор ответа: danulpopov
0
После такого стресса хочется пойти и выпить пару кружек чаю, сегодня ошибка на ошибке, просто шок....
Автор ответа: Аноним
0
Вот для этого и существуют компьютерные игры! ))))
Похожие вопросы
Предмет: Астрономия, автор: nadahrulenko168
Предмет: Алгебра, автор: kirillpak62