Сколько существуют двузначных чисел сумма цифр которых = 7 .Запишите ** языке...

Question

Сколько существуют двузначных чисел сумма цифр которых = 7 .Запишите на языке программирования

Comments

ответ можете добавить

---

))

---

)))

Answer 1

Var n,i,i1,i2:integer;
Begin
    for i:= 10 to 99 do Begin
        i1:=i div 10;
        i2:=i mod 10;
        if (i1+i2=7)then n:=n+1;
    end;
    writeln(n);
End.