Требуется написать программу, которая получает два числа и находит их проведение, не используя операцию умножения.
ВАЖНО!!!НУЖНО ИСПОЛЬЗОВАТЬ REPEAT и UNTIL
ВАЖНО!!!НУЖНО ИСПОЛЬЗОВАТЬ REPEAT и UNTIL
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var A,B,C,I:integer;
begin
Writeln('введите числа');
Readln(A,B);
C:=0;
i:=1;
repeat
C:=C+A;
I:=I+1;
until i>B;
writeln(C);
end.