Исправьте ошибки в программе. Укажите их количество. Program A; Const X : 50; С : 1000; Var SUM, PR, D : integer; Begin SUM := X+C; Writeln ( SUM ); PR := X*C; Writeln ( PR ); D := X / C; Writeln ( D ); End.

i,n: integer;

 procedure IN1(var a,b:real;n:integer;var y:real);

  var

   p:real;

   i:integer;

     begin

       y:=1;

        for i:=1 to n do

         begin

          p:=exp(b*ln(a));

           y:=p*y;

         end;

     end;

procedure IN2(var a, b:real; n:integer; var y1:real);

 var

  p:real;

  i:integer;

   begin

    y1:=0;

      for i:=1 to n do

       begin

       p:=exp(b*ln(a));

       y1:=y1+p;

      end;

   end;

begin

Объяснение:

Program A;

Const X = 50;

C = 1000;

Var SUM, PR: integer;

D: Real;

Begin

SUM := X+C;

Writeln ( SUM );

PR := X*C;

Writeln ( PR );

D := X / C;

Writeln ( D )

End.

3 ошибки:

1) X : 50;

2) C : 1000;

3) SUM, PR, D : integer;

Ещё есть ; перед end (но это не ошибка).

Объяснение:

В Паскале описание элементов раздела констант (Const) имеет вид:

имя константы = значение;

Тип константы определяется автоматически, т.е. в отличии от раздела описания переменных (Var) не нужно указывать тип данных.

Результат деления всегда действительного типа (real).

Операторы отделяются друг от друга точкой с запятой (;).

Слова begin и end не являются операторами - они служат знаками пунктуации. Слово begin выступает в качестве левой скобки, а end - правой скобки. Так как они сами знаки пунктуации, то точка запятой после begin и перед end не обязательна.

2)
32*32=2^10
512 байт =512*8 бит =2^9 *2^3=2^12
2^12 : 2^10 = 2^2 =4 бита для одного пикселя
2^4 =16 цветов ;  ответ 16 цветов.
3)
64*32 =2^11
1 Кбайт =2^10 байта =2^13 битов
2^13 : 2^11 =2^2=4 битов
2^4 =16 цветов   ответ 16
4) 
5+5 =10 битов под кр и син
8*8=2^6
128 байт=2^7 байт=2^10 бит
2^10 : 2^6 =2^4 =16 бит
16-10 =6 бит под зелёную  ответ 6 бит
5)
32*64=2^11
512 байт =2^9*2^3 бит =2^12 бит
2^12 : 2^11 = 2 бита под один пиксель
2^2 =4 цвета           ответ 4
6)
128 *128 = 2^14
4 Кбайта = 2^2 * 2^13 битов =2^15 битов
2^15 : 2^14 =2 бита под один пиксель
2^2=4 цвета   ответ 4

Например русская печь 
Дымовое отверстие 
Подполье для хранения овощей: Картофель,свёкла,морковь.
Когда заходишь в русскую избу всегда видишь подкову ,её вешали для того что бы в дом не заходила плохая энергетика и что б в дом шло только богатство и удача так же делали обряды и в наше время люди верят что нужно рисовать на колодах крестики углём,что бы не заходила так же плохая энергетика 
Кровля была сделана из черепиц или соломы , а под крышей засыпали сеном( сухая трава)(так же там жили куры и спали жильцы дома, когда к ним приезжали желанные гости)
Дом был без окон , внутри была печь в ней варили, жарили, сушили травы(лечебные) Был отдел где люди спали,когда была зима (печи достигали  пол метра- в ширину. В высоту такие печи достигали 1,2 метра