Program zadacha;
vara: array[1..10] of integer;i,min,n: integer;
beginn:=0;for i:=1 to 10 do begina[i]:=-5+random(5);write(a[i]:4);min:=a[1];end;
for i:=2 to 10 do beginif min>a[i] then min:=a[i];end;
for i:=1 to 10 do beginif a[i]=min then beginn:=n+1;end;end;
writeln();writeln('min=',min);writeln('n=',n);end.
16МБ=128000000бит
4мин=240сек
128000000:240примерно 533333бит/с
Я могу только проговорить
взять лукошко
сорвать ягодку
опустить ягодку в лукошко
и это все повторяется несколько раз
если правильно можеш списывать как схему
Begin
var s:=readlnstring;
var gl:='АЕИОУЫЯЁЮЭ';
var m:=s.ToWords;
var k:=m.Length;
var b:=new integer[k];
for var i:=0 to k-1 do
b[i]:=m[i].Where(c->c.ToUpper in gl).Count;
Writeln(m[b.IndexMax])
end.
Переведем А7^16 и 100^3 в десятеричную. А^16 = 10 следовательно, А7^16 = (10*16^1)+(7*16^0)=167 100^3=(1*3^2)+(0*3^1)+(0*3^0)=9 значит, у Людочки на 9 меньше , чем у Эллочки. Отсюда получаем 167-9=158 (это мы получили в десятеричной) далее просто переводим в нужную систему счисления. 10011110^2 236^8 9Е<span>^16</span>