Составьте программу вычисления суммы всех двузначных чисел Паскаль Через While

Question

Составьте программу вычисления суммы всех двузначных чисел
Паскаль
Через While

Comments

а какое условие для while? вводится ноль? вводится не двухзначное число?

---

ааа. понял

Answer 1

var

  a,s: integer;

begin 

  a:=10;

  while a<=99 <span>do begin 

    s:=s+a;

    a+=1;

  end;

  writeln(s);

end.