ПОМОГИТЕ ПОЖАЛУЙСТА С ИКТ!!! ДАЮ 15 БАЛЛОВ. ПАСКАЛЬ.
______________________________________________
Задача: Найдите сумму всех двузначных чисел кратных 9 с помощью оператора цикла while.
Заранее огромное спасибо!!!

Можно вопрос, а для чего вы написала " i:=10 ", для чего это действие?

написали*

10 - двузначное число в последовательности

первое

спасибо!

var s,i: integer;begins:=0;i:=10;while i<100 do begin  if i mod 9 = 0 then s:=s+i;  i:=i+1;  end;  writeln(s,' - cумма членов последовательности кратных 9 ');end.