как рассчитать премию и зарплату? Заранее

Var
a: array [1..10] of integer;
i,j,k:integer;
begin
for i:=1 to 10 do begin
a[i]:=Random(50);
write(a[i],);
end;
for i:=1 to 9 do
begin
if (a[i]>a[i+1] )then
writeln(i);
end;
end.
надеюсь это что вам нужно

I = 3кб, К = 3072 символа, N — ?I= 3 Кб = 3 • 1024 • 8 = 24576 бит I = I/K = 24576/3072 = 8 бита N=2^8 = 256 символов 

Расцените , на сколько примерно мб или гб вы заполняете информацией свой гаджет ( смартфон , ПК , и тд. )
Подумаете , как она должна выглядеть , большая или маленькая .
Посчитав сколько памяти вы заполняете каждый день округлите и умножите на 2 . У вас получится идеальный объём памяти на флешке для вас !

Роянская программа ... Троя́нская программа (также — троя́н, троя́нец,троя́нский конь) — разновидность вредоносной программы, проникающая в компьютер под видом легального программного обеспечения, в отличие от вирусов и червей, которые распространяются самопроизвольно.