ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!! очень нужно!!!!!!!!!! ПОМОООГИИИИТЕЕЕЕЕЕ!!!!!!!!!!!!!!!!
Дано многоразрядное число N <=10^9. Найти частное от деления цифр числа, разряды которых равны 1 и 6.

Вон я там с циклом написал чуть более раннюю задачу....можете из нее переделать себе, там все ясно предельно

15 строк вместо одной-единственной... учат в школе фигне, а потом мы удивляемся результатам, что выходят балбесы в основном одни из школы.

var a,a1,a6:longint;beginwrite('a = ');readln(a);a1:=a mod 100 div 10;a6:=a mod 10000000 div 1000000;writeln('a1 = ',a1,' a6 = ',a6);if a6<>0 then writeln(a1/a6);end.Пример:a = 12354645a1 = 4 a6 = 2 4/2= 2