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