Maple как НЕ выводить результат вычисления?

[Sonic86]

Например, такой код:

S:=0;
for k from 1 to 1000 do
S:=S+k; // результат выводить НЕ нужно
od;
S;

Как убрать вывод результата вычисления в каждом шаге цикла?
Замена S:=S+k; на S:=S+k: не помогает никак - все равно все выводится.
Поставить двоеточие после od нежелательно - нельзя выводить вообще все внутри цикла.

[nnosipov]

Во вложенном цикле такого не происходит, поэтому можно просто добавить ещё один внешний цикл типа for i from 0 to 0 do <далее то, что надо> od; Как сделать по-человечески, не знаю, но тоже был бы рад узнать.

[Sonic86]

nnosipov писал(а):

Во вложенном цикле такого не происходит, поэтому можно просто добавить ещё один внешний цикл типа for i from 0 to 0 do <далее то, что надо> od; Как сделать по-человечески, не знаю, но тоже был бы рад узнать.

S:=0;
for k from 1 to 20 do
for m from 1 to 1 do
S:=S+k:
od:
k;
od;
S;

тоже не помогло - все равно выводит значения S. Вот козёл!

(Оффтоп)

мало того, что я 10 дней (вырезано цензурой) пока узнал о printlevel...

help писал(а):

To suppress the output of large computations, place a colon at the end of the Maple command.
> 10000!:

[Vince Diesel]

Вот так не печатает:

S:=0;
for k from 1 to 1000 do
S:=S+k;
od:
S;
S

[Sonic86]

Vince Diesel в сообщении #473513 писал(а):

Вот так не печатает:

S:=0;
for k from 1 to 1000 do
S:=S+k;
od:
S;
S

Спасибо, работает, но принцип неясен.
Реальный код такой:

printlevel := 3;
A:= 2; C:=20; B:=binomial(2*A-3,A-2);
for k from A to C do
for m from 1 to 1 do
B:=B*2*(2*k-1)/k;
od: 
if (not isprime(k) and k mod 2 = 1) then
if B mod k = 1 then
k;
fi;
fi;
od;
k;

И вот что мне с вычислением B сделать? Если я там без ; или : оставлю - не отработает, иначе - выводит.

[mihailm]

Как это не ясен, последнее двоеточие убивает весь вывод
и где вы команду od отрыли, понятнее писать end do

[Sonic86]

mihailm в сообщении #473547 писал(а):

Как это не ясен, последнее двоеточие убивает весь вывод

У меня оно ничего не убивает - выводит как обычно.

mihailm в сообщении #473547 писал(а):

и где вы команду od отрыли, понятнее писать end do

Не помню Где-то отрыл. Мне всяко лучше чем end do.

[Vince Diesel]

С двоеточием в последнем od вывода меньше:

printlevel := 3;
A:= 2; C:=20; B:=binomial(2*A-3,A-2);
for k from A to C do
for m from 1 to 1 do
B:=B*2*(2*k-1)/k;
od: 
if (not isprime(k) and k mod 2 = 1) then
if B mod k = 1 then
k;
fi;
fi;
od:
k;

[Sonic86]

А! Понял! Вы все обворачиваете двоеточием, а то, что нужно выводить пишете отдельно внизу? Попробую...

[Sonic86]

Нет, не выводит , выводит лишь последнее $k$, а должен выводить значения $k$ внутри цикла (здесь должен вывести $9$)

[Vince Diesel]

У меня выводит вот что:

                                      3
                                      2
                                     20
                                      1
                                     21

девятки нет.

[Sonic86]

Vince Diesel в сообщении #473705 писал(а):

У меня выводит вот что:
Код:
                                      3
                                      2
                                     20
                                      1
                                     21

девятки нет.

И я про то же: не выводит, но должен.
Я может непонятно сформулировал ?

[Vince Diesel]

Ну, можно по-простому поставить print:

printlevel := 3;
A:= 2; C:=20; B:=binomial(2*A-3,A-2);
for k from A to C do
for m from 1 to 1 do
B:=B*2*(2*k-1)/k;
od: 
if (not isprime(k) and k mod 2 = 1) then
if B mod k = 1 then
print(k);
fi;
fi;
od:
k;

[Sonic86]

Vince Diesel в сообщении #473775 писал(а):

Ну, можно по-простому поставить print:

Вот! Про print-то я и не знал! Спасибо! Теперь можно работать!

[AlexanderTretyak]

Перед оператором с нежелательным выводом информации поставьте команду

printlevel := 0;

Для восстановления статуса-кво поставьте команду

printlevel := 1;

Вообще полезно изучить действия операторов

printlevel:=; printlevel:=1; printlevel:=2; printlevel:=3; ...