Напишите оператор присваивания, в результате выполнения которого целой переменной н присвоится значение цифры, стоящей в разряде сотен в записи положительного целого числа к ( например, если к= 28796, то н= 7). p.s язык Паскаль:)

Напишите оператор присваивания, в результате выполнения которого целой переменной н присвоится значение цифры, стоящей в разряде сотен в записи положительного целого числа к ( например, если к= 28796, то н= 7). p.s язык Паскаль:)
Гость
Ответ(ы) на вопрос:
Гость
var n,k:integer; begin readln(k); n:=(k mod 1000) div 100; writeln(n); end.
Гость
var n, k:integer; begin write('vpishite chisli'); read(k); n:=(k mod 1000) div 100; write(n)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы