Исло n(0<=N<=9). Составьте программу, вычисляющую сумму всех двухзначных чисел, в записи которых есть цифра N<br> Пж побыстрее!!)))
Var n,s,i:integer; begin write('n = '); readln(n); s:=0; for i:=10 to 99 do if (i mod 10 = n)or(i div 10 = n) then s:=s+i; writeln('s = ',s); end. Пример: n = 1 s = 593