2. Как выполнить поиск информационного объекта в файловых структурах Windows?

var

i,n: integer;

a: array [1..100] of integer;

begin

readln(n);

for i: =1 to n do

begin

if i mod 2 =0 then a[i]: =i-3

else a[i]: =i+3;

writeln(a[i]);

end;

end.

а) наличие электромагнитного излучения, сrt

  б) ухудшение качества изображения при изменении угла обзора, lcd

  в) компактные размеры lcd

  г) достаточно сильное ухудшение качества изображения при изменении рекомендуемой производителем разрешающей способности crt lcd

  д) формирование изображения с лучей электронных пушек, crt

  е) меньший вред для здоровья человека при работе. lcd

- лондонгермания - берлиниспания - мадридиталия - римпольша - варшаваукраина - киевфранция - париж

да както сама удивилась как мало я знаю(

16*2*60/8 мего байт