оператор цикла. помогите решить задачу! ввести два целых числа, найти их произведение не используя операцию умножения

Question

Информатика

Виталия

15 апреля, 00:32

оператор цикла. помогите решить задачу! ввести два целых числа, найти их произведение не используя операцию умножения

+3

Ответы (1)

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

Дросида · Answer 1

var

a, b: integer;

c: real;

begin

writeln ('Введите 1 число') ;

read (a) ;

writeln ('Введите 2 число') ;

read (b) ;

c: = (a/1) / (1/b) ;

writeln (c) ;

end.