Дано натуральное число n (n больше 9). Нужно найти число сотен в нем.(паскаль)
Дано натуральное число n (n>9). Нужно найти число сотен в нем.(паскаль)
Гость
Ответ(ы) на вопрос:
Гостьvar n :integer;
begin
Write('ведите число n: ');
readln(n);
writeln('число сотен в ',n,' = ',(n mod 1000)div 100) ;
end.
Не нашли ответ?
Похожие вопросы