вычислите сумму всех двузначных чисел, используя циклический оператор

Var i,s:integer;beginfor i:=10 to 99 dos:=s+i;writeln (s);end.ну илиvar i,s:integer;begini:=10;while i<100 do begins:=s+i;i:=i+1;end;writeln (s);end.