Как создать сообщество в Вк​

Program Princess;
uses crt;
var
  M:Integer;
begin
  writeln('');
  writeln('*        Вас приветствует ППП         *');
  writeln('*    Программа Проверки Принцесс      *');
  writeln('*                                     *');
  writeln('*      Сейчас узнаем...               *');
  writeln('');
  writeln('1. Постелите постель для девушки');
  writeln('2. Подложите горошину');
  writeln('3. Дождитесь утра...');
  writeln('4. Разбудите девушку');
  writeln('5. Спросите: "Как Вам спалось?" ');
  writeln('6. Введите в систему ответ девушки:');
  writeln('   0 - "Плохо, совсем не сомкнула глаз..." ');
  writeln('   1 - "Отлично выспалась" ');
  readln(M);
  writeln('');
  writeln('*                Итак...              *');
  if m=0 then
  writeln('* Эта девушка - настоящая принцесса!  *')
  else
  writeln('*  Увы! Эта девушка - не принцесса!   *');
  writeln('');
end.

Если хорошенько задуматься, то получается всего 4 компьютера.
Допустим, дадим этим углам имена 1,2,3,4. 
12      Итак, в каждом углу по одному компьютеру. 
|                |      Назовём эти компьютеры так, тот, что стоит в углу 1
|                |      будет называться К1 (компьютер 1), тот, что стоит в углу 
||      2 будет К2, и тд. (Всего компьютеров: К1,К2,К3,К4).
3              4      Теперь смотрим на рисунок: напротив К1, стоит К3, а напротив К2, стоит К4. То есть, напротив 1 компьютера стоит 3, напротив 3 - 4. То есть, всего 4 компьютера. Даже если эти компьютеры мы повернём лицом к середине комнаты, всего будет 4 компьютера, так как 1 будет смотреть на 4, а 2 на 3. 
ответ: всего 4 компьютера.