Найти творение x*n с подмогою цикла не используя операцию умножения

Отыскать произведение x*n с подмогою цикла не используя операцию умножения

Задать свой вопрос
1 ответ
Program mult; var x, n, i: integer; begin write('Введите x и n через пробел'); readln(x, n); if ngt;0 then for i:=1 to n-1 do x:=x+x else for i=1 downto n do x:=x-x; writeln('x * n =', x) end.
Кирилл Драй
спасибо огромное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт