Перезагрузи компьютер , если не поможет то включи попробуй , а потом выключи антивирусы.
Ну, во-первых, за тем, чтобы придерживаться сути инкапсуляции: Людям свойственны ошибки. Например, будь у нас прямой доступ к полю, мы бы могли ошибочно изменить значение. При использовании методов, мы, разумеется, 5 раз подумаем, прежде чем взаимодействовать с ним.
Во-вторых, для простоты. Нам не нужно подробно изучать все внутреннее устройство, достаточно начать взаимодействовать с методом, который сделает всю внутреннюю работу за вас.
2 - (командир полка) - для поддержания дисциплины в полке.
3 - для поддержания порядка в государстве.
4 - для поддержания порядка в кабинете.
5 - чтобы знать, как пользоваться компьютером.
6 - чтобы правильно решить задачу.
Вроде вывод и ввод получается спирт
Var a,a1,a2,a3: integer;
begin
write ('Введите трехзначное число: '); read (a);
a1:=a div 100 mod 10;
a2:=a mod 100 div 10;
a3:=a mod 10;
writeln ('Полученное число: ',a3,a1,a2);
end.