Найдите мощность множества истинности предиката: p(z)=(z> 3)& (z+3)< 16), если z-множество целых чисел.

для 4 символов:

2*2*2*2=16

 

для 5 символов:

2*2*2*2*2=32 

 

для 6 символов:

2*2*2*2*2*2=64

 

16+32+64=112

 

   

 

 

4 попрощайся и захлопни дверь

6 вс выключи .

  заголовок выйди из дома

 

3 закрой квартиру

4 поверни ключ

var a,b,c,s,p: real;

begin

  read(a,b,c);

  p: =(a+b+c)/2;

  s: =sqrt(p*(p-a)*(p-b)*(p-c));

  write(s: 0: 2);

end.

 

вроде так

Var a,b,c,t: integer; begin   read(a,b,c);   writeln('a': 4,'b': 4,'c': 4);   writeln(a: 4,b: 4,c: 4);   t: =a;   writeln(a: 4,b: 4,c: 4);   a: =c;   writeln(a: 4,b: 4,c: 4);   c: =b;   writeln(a: 4,b: 4,c: 4);   b: =t;   writeln(a: 4,b: 4,c: 4); end.