Даны натуральные числа x и y. Вычислить произведение x*y, используя лишь сложение. Язык программирования: Паскаль.
Даны натуральные числа x и y. Вычислить произведение x*y, используя лишь
сложение. Язык программирования: Паскаль.
Гость
Ответ(ы) на вопрос:
Гостьvar x,y,i,p:longint;
begin
write ('X = ');
readln (x);
write ('Y = ');
readln (y);
p:=0;
for i:=1 to y do p:=p+x;
writeln ('Proizvedenie: ',p);
end.
Не нашли ответ?
Похожие вопросы