Составить программу нахождения произведения z двух натуральных чисел x и y без использования операции умножения
Составить программу нахождения произведения z двух натуральных чисел x и y без использования операции умножения
Гость
Ответ(ы) на вопрос:
ГостьVar X,Y,Z:integer;
Begin
Write('X = ');
ReadLn(X);
Write('Y = ');
ReadLn(Y);
Z:=0;
For X:= 1 to X do
Z:=Z+Y;
Write('Z = ',Z);
End.
Не нашли ответ?
Похожие вопросы