Из предложенных фрагментов составьте программу для следующей задачи: Сформируйте и выведите массив А из 8 элементов случайными числами.

1.randomize;

2. For k := 1 To 8 Do writeln ('a[',i',]=', a[i]);

3.Var a: Array [1..8] Of Integer;

4.end.

5.Begin

6. For k := 1 To 8 Do a[i]:=random(50);

Напишите в ответе последовательность чисел без пробелов

письменность была нужна для оформления сделок, фиксации движения товаров, выручки, учета,  финикийцы известны, прежде всего, как предприимчивые торговцы и отважные мореплаватели.

program p_1

var

a: string

begin

writeln ('vvedite nazvanie rek');

read (a);

if (a='волга,днепро,нёман,енисей')then

writeln ('в беларуси протекают только днепро,нёман');

end.

значит так, используем единственную в информатике формулу

n=2^i

n-это количество символов в алфавите, значит n=64

64 это 2 в 6 степени, значит i=6 - это информационный объем одного символа, а нам надо найти информационный объем 3072 символа, значит

6*3072 = 18432 бита = 2304 байта

7680*90=691200

691200/16=43200

43200/400=108 страниц