Дано натуральное число n (n> 9). нужно найти число сотен в нем.(паскаль)

bakhtovar2 bakhtovar2    2   04.06.2019 23:30    1

Ответы
arman83 arman83  01.10.2020 19:32
Var    n :integer;
begin
    Write('ведите число n: '); 
   readln(n);
   writeln('число сотен в ',n,' = ',(n mod 1000)div 100) ;
   end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика