Const n=
var a:array [1..n] of integer; (целый)
i,k, i_max: byte; max, sum:integer;
begin
randomize; или for i:=1 to n do
for i:=1 to n do readln(a[i]);
a[i]:=random (100);
k:=0
for i:=1 to n do
if a[i]<0 then k:=k+1];
max:=0; i_max:=0;
for i:=1 to n do
if a[i]>max then begin max:=a[i]; i_max:=i; end;
sum:=0;
for i:=i_max to n do
sum:=sum+a[i];
writeln('Количество отрицательных элементов ',k);
writeln('Сумма элементов ', sum);
readln;
end.
1 рис.-караси и хищные. 2 рис.-в 1 круге-караси,во 2-хищные,в большм круге-рыбы
Ответ:
32 байта
Объяснение:
Ну так как 1 цвет это 1 байт, то логично 32 цвета это 32 байта. А в битвах это 32 × 8 = 256 бит
Так не пойдёт?если поставить впереди но,потом нарисовать утку,две последние буквы убрать,потом нарисовать букет цветов и тоже две буквы убрать,и в конце у