Написать программу перемножающую целые числа без использования операции «*». паскаль абс

leo1010101 leo1010101    3   29.05.2019 01:20    1

Ответы
оченьнеочень оченьнеочень  01.10.2020 13:56
P.S. Благодарность и лучший ответ не помешает.

var a, b, c, i:integer;
begin
read (a,b);
c:=0;
for i:=1 to b do
c:=c+a;
write (c,' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
lidiyavasilenkо lidiyavasilenkо  01.10.2020 13:56
Var
a,b,n,i:integer;
begin
read(a,b);
for i:=1 to b do
n:=n+a;
writeln(n);
end.

Надеюсь на Лучший ответ ;)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика