Нужно написать программу нахождения большего из 4 чисел заранее огромное

используем рекурентную формулу, чтобы программу

а[n+1]=1/4

a[n]=1/2

t=(1/4)/(1/2)=1/2

a[n+1]=a[n]*1/2

program;

var  n: integer; abs,s,a: real;

begin

a: =1;

eps: =1;

s: =1;

repeat

a: =a*1/2;

abs: =abs(a);

s: =s+a;

until abs< 0.001;

writeln(s);

end;

да,можно.только одного цвета будет 12,а другого тоже 12 и одна клетка останется. 

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

6 вс выключи .

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

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

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

var n,z: longint;

begin

  read(n);

  z: =abs(n);

  z: =z-2;

  writeln(z);

end.