Помогите ! Напишите на любом известном вам языке программирования программку, которая

Так как вначале в задании обозначено : "на любом известном для вас языке программирования" - вот, держи на С.

include lt;stdio.hgt;

include lt;stdlib.hgt;

include lt;locale.hgt;

define N 100

int main()

setlocale(LC_ALL, "Rus");

int i, M;

float B[N], MIN;

printf(" Введите количество частей массива (не больше 100) =gt; ");

scanf("%d", amp;M);

if (M lt; 100)

for (i = 0; i lt; M; i++)

printf("Введите [%d] элемент массива =gt;", i);

scanf("%f", amp;B[i]);

for (i = 0; i lt; M; i++)

printf("%1.0f ", B[i]);

MIN=B[0];

for (int i=1; ilt;M; i++)

if (B[i]lt;MIN)

MIN=B[i];

printf ("\n\tМинимальное значение в массиве =gt; %7.2f", MIN);

else

printf("Ошибка. Данное число частей массива очень большое.");

return 0;

Program Minimum;

Var i, n, Min : integer ;

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

Begin

Writeln('Введите количество частей массива') ;

Readln(n) ;

For i := 1 to n do

begin

read(a[i]);

end;

Min := a[1];

for i := 2 to n do

if a[i]lt;Min then Min := a[i];

writeln('Малый элемент массива = ', Min) ;

end.