Uses Crt;
const a=0;
b=10;
n=15;
var i: longint;
Rez: longint;
begin
ClrScr;
WriteLn ('Task 1:');
for i:=10 to 35 do
Writeln(i:3);
Delay (2000);
WriteLn ('Task 2:');
for i:=5 to n do
Writeln(i*i:5);
Delay (2000);
WriteLn ('Task 3:');
for i:=a to 50 do
begin
Rez:=i*i*i;
Writeln(Rez:7);
end;
Delay(2000);
WriteLn ('Task 4:');
for i:=a to b do
Writeln(i:3);
ReadLn;
end.
Как мы понимаем что палитра состоит из двух цветов
значит вес одного пикселя равен одному
N=2^i=2
i=1
объём равен вес*ширина*высота
I=i*height*width=240000 бит
если что я переведу из бит в байт если надо
30000 байт 29,29 КБ
Program XY5;
var
x,y: real;
begin
var s:='**** -=Alphaeus=- ****';
for var k:=1 to 22 do begin write(s[k]); sleep(47) end;
writeln;writeln;
writeln('Введите координаты точки:');
write('X='); readln(x);
write('Y='); readln(y);
if ((x>=0) and (y>=0) and (x*x+y*y<=16)) or ((x>=0) and (y<=0) and (x*x+y*y<=25)) then
writeln('TRUE (то есть точка (',x,',',y,') попадает в заштрихованную область) ')
else
writeln('FALSE (то есть точка (',x,',',y,') HE попадает в заштрихованную область) ');
end.
<span>Древнеиндийские книги делались из пальмовых листьев. Пластины из листьев через специальные отверстия скрепляли веревочкой. На пальмовых листьях писали чернилами из сажи, разведенной в подслащенной воде.</span>
<span>
</span>
Количество инф в первом тексте к=5, во втором к=8, разница 5/8.