Выполнить алгоритм и найти значение переменных.

знаю, что арабские цифры придумали в древней индии, про древнеиндийские книги знаю только то, что их писали на языке санскрите, и если не ошибаюсь, то записи в древней индии делали на глине

var

a: array[1..31] of real;

i,k: integer;

min: real;

begin

min: =50;

for i: =1 to 31 do

begin

readln(a[i]);

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

end;

k: =0;

for i: =1 to 31 do

if a[i]=min then k: =k+1;

writeln(k);

end.

иванов - парикмахер

петров - плотник

сидоров - мельник

гришин - почтальон

алексеев маляр

классификации на : числа бывают: натуральными(1,2,3); целыми(2,   -5); дробными(6,73). на : предложения бывают: простыми, сложными: сложноподчинёнными, сложносочинёнными, сложными с разными связи, сложные бессоюзные.