Составить программу нахождения произведения z двух натуральных чисел x и y без использования операции умножения

Question

Информатика

Самуил

16 июля, 18:45

Составить программу нахождения произведения z двух натуральных чисел x и y без использования операции умножения

+5

Ответы (1)

Знаете ответ на вопрос?

Бина · Answer 1

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.