ДАЮ 50 БАЛЛОВ!Даны целое число k (1 меньше =k меньше =150) и последовательность цифр 101102103…149150, в которой выписаны подряд все трехзначные числа.Определить k-тую. цифру, если k кратно трём.Pascal ABC.

var k,n:integer; begin write('k = (k кратно 3) '); readln(k); n:=k div 3 mod 10; writeln(k,'-я цифра последовательности 101102103…149150 = ',n); end. Пример: k = (k кратно 3) 27 27-я цифра последовательности 101102103…149150 = 9