Объясните, что неправильно в такой записи:

<h1><h2>Важный момент</h2></h1>​

программа на языке паскаль

program pr;

s: string;

begin

readln (s);

if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');

readln;

end.

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то  

var a: array [1..100] of real; i,n: integer;

t: real; begin  randomize;   n: =20;   for i: = 1 to n do begin      a[i]: =random(n*10)- 10*n div 2 ;       write(a[i]: 4);       if i mod 10=0 then writeln;   end;  

  t: =a[1]

  for i: = 1 to n do begin      a[i]: =a[i]/t ;       write(a[i]: 4);       if i mod 10=0 then writeln;   end;   end.

1. а)11000110;

    б)11000001011;  

    в)1100000101,111;  

    г)2335,54;    

    д)3f5d0.

  2.а) 100000011;

      б)111110100;  

      в) 1000111001,1101;  

      г)1110111100000  

3.а) 10001111011100;  

4.а)   11000;     б) 70;     в)7е.