Дан массив A размера N и целое число K (1 ≤ K ≤ 4, K < N). Осуществить циклический сдвиг элементов массива вправо на K позиций (при этом A 1 перейдет в A K+1 , A 2 — в A K+2 , ..., A N — в A K ). Допускается использовать вс массив из 4 элементо

var

  a, b : real;

begin

  read (a, b);

  write (trunc (a * b));

end.

var

  a : integer;

begin

  read (a);

  write (frac (a / 10));

end.

г)

var

  a, b : real;

begin

  read (a, b);

  write (round (a + b));

end.

d)

var

  a, b : integer;

begin

  read (a, b);

  write (a div b);

end.

e)

var

  a : integer;

begin

  read (a);

  write (a div 1000);

end.

ж)

var

  a : longint;

begin

  read (a);

  write (a div 24 + 1);

end.

з)

var

  k : integer;

begin

  read (k);

  write (k div 7 + 1);

end.

и)

var

  k : integer;

begin

  read (k);

  write (k div 60, ':', k mod 60);

end.

var

  a, b : real;

begin

  read (a, b);

  write (trunc (a * b));

end.

var

  a : integer;

begin

  read (a);

  write (frac (a / 10));

end.

г)

var

  a, b : real;

begin

  read (a, b);

  write (round (a + b));

end.

d)

var

  a, b : integer;

begin

  read (a, b);

  write (a div b);

end.

e)

var

  a : integer;

begin

  read (a);

  write (a div 1000);

end.

ж)

var

  a : longint;

begin

  read (a);

  write (a div 24 + 1);

end.

з)

var

  k : integer;

begin

  read (k);

  write (k div 7 + 1);

end.

и)

var

  k : integer;

begin

  read (k);

  write (k div 60, ':', k mod 60);

end.