Запишите в развернутом виде числа: 200710, 2348, 101102 .

200710= 0*10 в нулевой ст+ 1*10 в первой ст+7*10 во второй ст+0*10 в третьей ст+ 0*10 в четвертой ст+ 2*10 в пятой ст=200710 2348= 8* 10 в нул ст+4*10 в первой ст+ 3*10 во второй ст+2*10 в третьей ст=2348 101102=2*10 в нул ст+0*10 в первой ст+ 1*10 во второй ст+1*10 в третьей ст+ 0*10 в четверт ст+1*10 в пятой ст=101102

 

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.

1.найти разность показаний счетчика на конец месяца и на начало месяца.

2.умножить на цену одного квт/часа