"Для чого призначені аудіо- та відеоредактори? Чим вони відрізняються від
програм-грaбeрів?​

var a: array [1..10] of integer;

min,max,i,c,b: integer;

begin

  read(c,b);

  randomize;

  for i : = 1 to 10 do

        a[i]: = random(b) -c+1;

  min: =1;

  max: =1;

  for i: = 1 to 10 do

  begin

        if a[min]> a[i] then min: =i;

        if a[max]< a[i] then max: =i;

  end;

  writeln(a[min], a[max]);

end.

n=2^b, где b=7 (по условию )

a)a2+b4 (нет знака"=")

ж)=12а-в4 (не 12а,а должно быть а12) 

з)а123+о1   (нет знака"=")

var s: string; i,n,max: byte;

beginn: =0; i: =1; max: =0; write('введите s -> '); readln(s);

while i< =length(s) do begin if (i=1) or (s[i]=' ') then begin if i < > 1 then inc(i); if (i< =length(s))and((s[i]='a') or (s[i]='a')) then

while i< =length(s) do if s[i]< > ' ' then begininc(n); inc(i); end else break; end; inc(i);

if max< n then max: =n; n: =0; end; write('длина самаго длинного слова на букву a = ',max); end.