Напишите программу нахождения максимального и минимального числа последовательности чисел(кол-во чисел неизвестно, числа вводятся с клавиатуры)

Var a,maxa,mina : integer; begin   readln(a);   mina: =a; maxa: =a;   repeat     if a> maxa then maxa: =a;     if a< mina then mina: =a;     readln(a);   until a=0;   writeln('min: ',mina);   writeln('max: ',maxa); end.

Python 3 a=str( max=a[0] min=a[0] for i in range(len(a)):       if a[i]> max:                 max=a[i]          if a[i]< min:                 min=a[i] print(min,' ',max)

текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно

30 символов = 30 байт или  30 * 8 = 240 бит

если массив состоит из 10 элементов то код программы:

 

const

  n=10;  

var

  a: array[1..n] of integer;

  i,min: integer;  

begin

for i: =1 to n do  read(a[i]);     {вводишь заданный массив}

min: =32767;

for i: =1 to n do

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

write(min);

end;