Составить задачу на языке Паскаль: "Дано трехзначное число. Вывести первую цифру этого числа (сотни

PascalABC.NET 3.7:

### RI.ToString[1].Pr

Справка:

RI: Возвращает значение типа integer, введенное с клавиатуры.ToString: Преобразует число в строковое представление (string).[n]: Возвращает n-ный символ строки.Pr: Выводит значение на экран.

var

a,b: Integer;

begin

readln(a);

b := (a div 100);

writeln(b)

end.