Придумать диалоговое окно. мой новый компьютер..

как то так  , вас windows 

копьютер:

олян: что делаеш?

компьютер: скачиваю твои нужные файлы а ты

олян: жду пока ты скачаеш)

"у семи нянек дитя без глаза." - 30 символов(" -2, . -1, пробел-5, букв-22) ⇒

30*2=60 байт

60*8=480 бит

program gh;

    var a: array[ 1..10] of integer;

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.