Uses crt;
const max=100;
var a: array [1..max] of real;
i,n:integer;
begin
clrscr;
write('Zadajte razmernost massiva');
readln(n);
writeln('Ishodnij massiv:');
for i:=1 to n do
begin
a[i]:=random(100);
write(a[i]:7:2);
end;
writeln;
writeln('Novij massiv:');
for i:=1 to n do
begin
if (i mod 2)<>0 then
a[i]:=sqrt(a[i]);
write(a[i]:7:2);
end;<span>
end.</span>
Формулы в столбцах а исходные данные можно прописать ниже, решение автозаполнением
При использовании палитры из 1024 цветов для хранения одной точки необходимо log(2)1024 = 10 бит (2^10 = 1024).
Память для рисунка:
512*256*10 бит = 512*256*10 / 8 байт = 512*256*10 / (8*1024) Кбайт = 160 Кбайт
Ответ:
Объяснение:
Надеюсь почерк разберешь) Не умею в паинте писать красиво