D16+1001001=<span> D16+49=D5F</span>
const
handsfree = false;
nmax = 31;
random_min = -20;
random_max = 30;
var
a: array[1..nmax] of real;
i, n, j: integer;
k: integer;
begin
{ввод массива}
if handsfree then
n := random(nmax - 5) + 5
else begin
write('n = ');
readln(n);
end;
writeln('Данные массива:');
for i := 1 to n do
begin
if handsfree then begin
a[i] := random(random_max - random_min) + random_min;
write(a[i], ' ');
end
else
readln(a[i]);
end;
writeln();
{подсчет элементов}
k := 0;
for i := 1 to n do
if a[i] = 15 then
k := k + 1;
writeln('quantity = ', k);
end.
1(b) 2(c) 3(b) 4(c) 5(a) 6(b) 7(c) 8(a) 9(c) 10(d) 11(c) 12(d) 13(b) 14(c) 15(b) 16(нет задания) 17(a) 18(d) 19(b) 20(b) 21(d) 22(b) 23(a) 24(b)
#include <iostream>
using namespace std;
int maks(int n)
{
int max=0,a;
for(int i=0;i<n;i++)
{
cin >> a;
if( a > max || max == 0) max = a;
}
return max;
}
int main()
{
cout << maks(4)-maks(2)+maks(5);
return 0;
}
// Поиск максимума выполнен методом инициализации изначального максимума)
В созвездии Малая Медведица 7 звёзд самая яркая из них Полярная звезда.