Дано: восьмизначное число N
Найти и вывести 4-ую,5-ую,6-ую цифры этого числа

//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var n:=ReadInteger('введите число:').ToString;
write('4 цифра: '+n[4]+'; пятая цифра: '+n[5]+'; шестая цифра: '+n[6]);
end.