Напишите программу, которая вводит с клавиатуры натуральное число N и выводит це-почку из N символов «o»:

Введите длину цепочки: 10

o

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.

дано:

g= 44,1 кгц= 44100 гц

i= 16 бит

t=2 мин=120 сек

v-?

решение:

v=g*i*t

v= 44100гц*16 бит*120 сек= 8467200 бит

v= 8467200/8*1024*1024= 10 мбайт

необходимо (но не достаточно).

var x: real; begin  read(x);   writeln(round(x)); end.