Есть ответ 👍

составить блок схему очень надо uses crt;
var a:array[1..100]of real;i,n,inn:integer;m,s,p:real;
begin m:=9999999;p:=1;
repeat
clrscr;
writeln('сколько элементов');
readln(n);
until (n>=1)and(n<=100);
for i:=1 to n do
begin
a[i]:=(5.4*(sin(i)/cos(i)))/i;
write(a[i]:1:10,' ');
if m>a[i] then begin m:=a[i];inn:=i;
end;end;writeln;
for i:=1 to n do
begin
if i if i>inn then p:=p*a[i];
end;s:=s/inn;
write('среднее арифметическое =',s:1:10,' произведение=',p,' минимальное=',m);
end.

230
410
Посмотреть ответы 1

Ответы на вопрос:


Глубина цвета 16 цветов = 2^4 =  4 бит 1024 * 128 * 4 = 524288 бит 524288 бит / 8 = 65536 байт / 1024 = 64 кбайт ответ: 64  кбайт

Популярно: Информатика