Сравни показанные ниже датчики цвета и касания определи их сходства и различия

var

x,y: real;

i,n: integer;

begin

n: =1;

x: =1;

y: =1;

for i: =1 to 5 do

begin

n: =n*i;

x: =-1.5*x;

y: =y*(x+1/n);

end;

writeln(y: 15: 5);

end.

program chislo;

var x: integer;

          z,y : real;

begin

readln(x);

y: =5.5;

z: = x-y;

writeln(z);

end.

при запуске программы вводите эти значения и тестируете.

program d1; varx1,x2,y1,y2,d: real; beginread(x1); read(x2); read(y1); read(y2); //d: =sqrt(sqr(x2-x1)+sqr(y2-y1)); write('ðàñòîÿíèå ìåæäó òî÷êàìè: ',d); end.

if x%2==0 then

  print("chetnoe')

else print("ne chetnoe")

end

if x%t==0 then

  print("da')

else print("net")

end

if a < 0 then

  a=a*a

elseif a > 0 then

  a=math.sqrt(a)

endprint(a)