Напишите оператор присваивания, в результате выполнения которого целочисленной переменной h присвоится значение цифры, стоящей в разряде сотен в записи положительного целого числа k (например, если k=28 769, то h=7).

Да я поставила - всё равно не читается. Неужели нужно вбить только одну строчку без var и begin?

Стоп, Вы же просили не программу, а оператор присваивания!

Стоп... да, я запуталась)прошу прощения)

Конечно, Вам надо написать окружение, var, begin, присваивание или ввод для k, потом этот оператор и вывод результатов, end. в конце

Аа, ясненько)еще раз большое спасибо)

n:=(k mod 1000) div 100