for
примеры
(Pascal)
for i := 1 to 10 do
s:=s+1;
(C#,C++)
for (int i=0;i<10;i++) {
s+=i;
}
(Ruby)
for i in 1..10
s=s+i
end
(VB, VBA, Basic,..)
for i = 1 to 10
s=s+i
next i
По умлчанию шагом счетчика является 1. Обычно шаг счетчика можно менять фразой by или step by. Хотя увы такое есть не во всех языках
(C#,C++)
for (int i=0;i<10;i=i+2) {
s+=i;
}
(VB, VBA, Basic,..)
for i = 1 to 10 step by 2
s=s+i
next i
Например в паскале возможен только обратный отсчет
for i := 10 downto 1 do
s:=s+1;
еще for примечателен тем, что даже если конец меньше начала (в варианте увеличения счета), то цикл все равно пройдет один раз. Правда не знаю подпадают ли под это правило языки из группы С
var k,i:integer; p,s:real; a:array[1..n] of real;
begin
for i:=1 to n do read(a[i]);
k:=0; p:=1; s:=0; i:=1;
repeat
if a[i]<0 then begin p:=p*a[i]; s:=s+a[i]; k:=k+1 end;
i:=i+2
until i>n;
if k>0 then write(s/k,' ',k,' ',p) else write(0,' ',0,' ',0)
end.