const n=10; var min,i: integer; a: array[1..n] of integer; begin randomize; min:=11; for i:=1 to n do begin a[i]:=random(1,10); write (a[i],' '); // для наглядности. можно удалить if (i mod 2 =1) and (a[i]<min) then min:=a[i]; end; writeln; writeln ('min = ',min) end.
Пример: 5 4 7 8 6 2 10 4 9 9 min = 5
2 задача:
const n=10; var max,count,i: integer; a: array[1..n] of integer; begin randomize; max:=0; count:=0; for i:=1 to n do begin a[i]:=random(1,10); write (a[i],' '); // для наглядности. можно удалить if a[i]>max then max:=a[i]; end; for i:=1 to n do if max=a[i] then count:=count+1; writeln; writeln ('max = ',max); writeln ('count = ',count); end.
Пример на языке с++, дошел только для этого
#include<iostream>
using namespace std;
int min(int a, int b, int c, int d)
{
int min1 = 0;
int min2 = 0;
if (a < b)
{
min1 = a;
}
else
{
min1 = b;
}
if (c < d)
{
min2 = c;
}
else
{
min2 = d;
}
if (min1 < min2)
{
cout << "Наименьшее из чисел: " << min1 << endl;
}
else
{
cout << "Наименьшее из чисел: " << min2 << endl;
}
return 0;
}
int main()
{
setlocale(LC_ALL,"RUSSIAN");
min(10,20,30,40);
return 0;
}