Помогите решить задачу ** паскале! Срочно!!! Найти количество пар двузначных чисел, сумма...

Question

Помогите решить задачу на паскале! Срочно!!!
Найти количество пар двузначных чисел, сумма которых не превысит 100

Answer 1

Var i,j,a:integer;
begin
a:=0;
for i:=10 to 99 do
for j:=10 to 99 do
if i+j<=100 then <br>a:=a+1;
writeln(a);
end.
В итоге вышла 3321 пара.