<span>А. for i:=-5 to 5 do тело цикла; - 11 раз
В. for i:=6 to 2 do тело цикла; - 0 или 1 раз
С.for i:= 3to 3 do тло цикла ; - 1 раз
D. for i:=3 downto 4 do тело цикла - 1 или 0 раз
E. for i := 3 downto 1 do - 3 раза</span>
Почему же нет операции?
я знаю как минимум 2 способа
1) через формулу <span>exp(ln(X) * </span>Y<span>)
2) функция pow(X, Y);
но если у вас тема про циклы, видимо вам надо вручную посчитать степень. тогда опишу вам внутренности функции pow
res:=x;
for i:=2 to y do
<span>res:=res*x;
Вот полностью программа
Var res,x,i,y: integer;
Begin
writeln('Введите x');
readln(x);
writeln('Введите y');
readln(y);
res:=x;
for i:=2 to y do
res:=res*x;
writeln(res);
<span>readln();
end.</span></span>
</span>
Ответ:
a = input()
b = input()
if (a == 'нет' or a == 'да') and (b == 'нет' or b == 'да'):
print('ВЕРНО')
else:
print('НЕВЕРНО')
Объяснение:
var
i, imax, sum: integer;
mas: array[1..12] of integer;
begin
for i:=1 to 12 do
read(mas[i]);
writeln;
for i:=1 to 12 do
if (mas[i]=100) then
begin
imax:= i;
break;
end;
for i:=1 to imax-1 do
inc(sum, mas[i]);
write('Сумма = ', sum);
end.