Должно быть так:
V=51200*4*64/1024=32000 kbits, для перевода в кБайты:
V=32000/8=4000 kbytes
Программа..............................................
Животные
Кролик
Гусь
Одежда
Футболка
Шорты
Мебель
Стул
Программа для Pascal.
PROGRAM Z;
USES CRT;
VAR
A,B:INTEGER;
M:ARRAY[1..10] OF INTEGER;
BEGIN
CLRSCR;
WRITELN('VVEDITE ELEMENTY');
FOR A:=1 TO 10 DO READLN(M[A]);
WRITELN('CHETNIE ELEMNTY : ');
FOR A:=1 TO 10 DO IF A MOD 2 = 0 THEN WRITELN (M[A]);
READKEY
<span>END.</span>