Задача 4 Аля гадает на счетах за квартиру. Она находит длинное число, берёт его первую цифру (это число n). Затем она отмечает n первых цифр длинного числа. Столько конфет «Коровка» бабушка ей купит на день рождения.
Дано число. Возьми первую цифру этого числа (это n) и выведи n первых цифр этого числа.

Ввод Вывод
321457 321
1234567 1

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

почитай тут 

|з       з|

|         з|

|з   з     |

program _1_2; uses crt; var  dlina, shirina, vysota: real; begin  clrscr;   textcolor(14);   writeln('вычисление объёма параллелепипеда.');   writeln('введите исходные данные: ');   write('длина (см) -> ');   readln(dlina);   write('ширина (см) -> ');   readln(shirina);   write('высота -> ');   readln(vysota);   writeln('объём: ',(dlina*shirina*vysota): 7: 2);   repeat  until keypressed; end.