Напишите программу, которая получает два целых числа и находит их произведение, не используя операцию умножения. Учтите, что числа могут быть отрицательными.
Пример:
Введите два числа:
10 -15
10*(-15)=-150

Это цикл с условием ( while)
ПАСКАЛЬ

Помогите пожалуйста
Заранее спасибо

Можно простить.

Но если сказано "вывод 10*(-15)=-150" - у меня вопрос возникает.

Так тогда бы и сказала, что достаточно дать число. Но ведь молчит, тупо твердя, что "так в задании, зеать ничего не знаю".

В общем, для меня тут больше дел нет)

Ну хочется ему всё выражение, пусть будет всё. Ну да Бог с ним. Логику я ему расписал, дальше пусть сам форматирует.

javascript:var a = parseInt(prompt()), b = parseInt(prompt()), c = 0, сч = 0; while (сч < Math.abs(b)) { c += a; сч++; } if (b < 0) c = -c; alert(c);

А вот и Pascal. Надеюсь, не ошибся.

program pr;

var a, b, c, cnt: integer;

begin

 a := readln();

 b := readln();

 c := 0;

 cnt = 0;

 while (c < abs(b)) begin

   c := c + a;

   cnt := cnt + 1;

 end;

 writeln(c);

end.