Задача, циклы Опции

[Диона]

Помогите решить задачки (на циклы):
1) Подсчитать k-- количество цифр неотрицательного целого числа n.

2) Найти d--старшую (левую) цифру неотрицательного целого числа n.

3) Определить, сколько раз (k) цифра 8 встречается среди первых пяти цифр дробной части положительного вещественного цичла x.

4) Получить целое число k добавлением слева цифры 6 к десятичной записи натурального числа n (например, k=6107 при n=107).

5) Логической переменной t присвоить значение true, если натуральное число k есть степень 10(1,10,100...), и значение false иначе.

[Bokul]

Артемий2, раздел то паскалевский, а стандартной функции inttostr там нету. Используй str(longint; Var string)). Хотя в справке дается пример аналога inttostr с использованием str.