Помагите!!!!!!!!!!!!!​

Var
N,k,i:longint;
A:array [1..1000] of longint;
Begin
Readln(n);
K:=0;
For i:=1 to n do
Readln(a[i]);
For i:=1 to n do
If (a[i] mod 6 = 0) and (a[i] mod 10 = 4) then
K:=k+1;
Writeln(k);
End.

512 Кбайт = 512*1024 байт = 512*1024*8 бит
а) При палитре из 8 цветов на один пиксель требуется log(2)8 = 3 бита
Количество страниц экрана = 512*1024*8/(640*200*3) ≈ 10
б) При палитре из 16 цветов на один пиксель требуется log(2)16 = 4 бита
Количество страниц экрана = 512*1024*8/(640*200*4) ≈ 8
в) При палитре из 256 цветов на один пиксель требуется log(2)256 = 8 бит
Количество страниц экрана = 512*1024*8/(640*200*8) ≈ 4

Я использую Corel Draw. Много лет с ней работаю - очень удобно. Кто то работает на PAGE MAKER, кто то еще на чем то. Кто к чему привык.

Робот. Естественно мне кажется.