function summdel(x:integer):integer; //результат - сумма делителей х var k,sum:integer; begin sum:=0; for k := 1 to x div 2 + 1 do if x mod k = 0 then sum:= sum+k; summdel:=sum; end;
begin writeln('Введите границы a,b '); readln(a,b); maxsumm := 1; max := 1; for i := a to b do begin if summdel(i) > maxsumm then begin maxsumm:= summdel(i); max := i; end; end; writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max) end.
console.writeline("введите количество чисел");
int n = convert.toint32(console.;
int[] a = new int[n];
console.writeline("введите числа");
for (int i = 0; i < n; i++)
a[i] = convert.toint32(console.;
int count = 0;
int min=a[0];
int max = a[0];
console.writeline("количество отрицательных");
for (int i = 0; i < n; i++)
if (a[i] < 0) { count++; }
console.writeline(count);
for (int i = 0; i < n; i++)
if (min > a[i]) { min = a[i]; }
console.writeline("минимальный элемент = "+min );
for (int i = 0; i < n; i++)
if (max < a[i]) { max = a[i]; }
console.writeline("максимальный элемент = "+ max);
int s = 0;
s = min + max;
console.writeline("сумма");
console.writeline(s);
console.writeline("числа кратные пяти и не больше числа задаваемым пользователем");
for (int i = 0; i < n; i++)
if (a[i] % 5==0 & & a[i]< n)
{ console.writeline(a[i]); }
console.readline();