Создайте программы на языке PascalABC: 1) Введите два числа (например A=5 и В=8) и найдите их произведение, используя цикл с постусловием и только операцию сложения. 2) Введите два числа (например A=45 и В=8) и найдите их остаток от деления нацело, используя цикл с постусловием и только операцию вычитания. 3) Определить значение переменной S после выполнения следующих операторов:S:=6; i:=3;Repeat S:=S 5 div i; i:= i – 1;Until i
Var a,b,i,r:integer; begin writeln('введите значения для A и B'); readln(a,b); i:=0; r:=0; repeat r:=r b; i:=i 1; until i=a; writeln('ответ ',r) end.
Var a,b,i,r:integer; begin writeln('введите значения для A и B'); readln(a,b); i:=a; r:=0; repeat i:=i-b; r:=i; until iwriteln('ответ ',r); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
