Їм бути дуже важко, та не зовсім цікаво на початку :( Англійску мову обов`язково знати!!! А так вчися)
1) Создаешь папку BOX
2)В папке BOX папку LETTER
3) В папке LETTER создаешь текстовый документ peter.txt и kate.txt
4)В папке LETTER создаешь папку WORK
5) В папке WORK создаешь текстовый документ april.txt и may.txt
6)В папке LETTER создаешь папку FREND
7) В папке FREND создаешь папку SCHOOL
8) В папке SCHOOL создаешь текстовый документ mary.txt
9) В папке FREND создаешь текстовый документ sport.txt
Число пикселей на двух страницах 2*640*800 = 1 024 000 пикселей. Поэтому объем видеопамяти = 14*1 024 000 =14 336 000 бит = 1 792 000 Байт = 1792 кБайт = 1,792 МегаБайт
Uses crt;
var i,n:integer;
a:array[1..100] of real;
begin
writeln('Сколько чисел в массиве?');
read(n);
writeln('Введите элементы.');
for i:=1 to n do
begin
read(a[i]);
if a[i]<0 then
a[i]:=abs(a[i]);
end;
for i:=1 to n do
write(a[i],' ');
<span>end.</span>
Два только могу пока, если остальное высчитаю напишу.
<span>1111001-1101=1101100
</span><span>10101110:101=100010</span>