По разделам



Задача Minmax 24


Дано целое число N (> 1) и набор из N чисел. Найти максимальную
сумму двух соседних чисел из данного набора.

Код (C/C++)

#include <stdio.h>
int main(void)
{
    int n,i;
    float r1=0,r2=0,maxsum=0;
 
    printf("N:");
    scanf("%i", &n);
    for (i=1; i<=n; ++i){
        r2=r1;
        printf("%i>",i);
        scanf("%f", &r1);
 
        if (i==2) maxsum=r2+r1;
        if (r1+r2>maxsum) maxsum=r2+r1;
    }
    printf("%f\n",maxsum);
    return 0;
}

Код (Python)

import random

N = random.randrange(3,15)
print("N = ",N)

L = [random.randint(1, 15) for i in range(N)]
print("Initial:",L)

mx = L[0] + L[1]
for i_curr, i_next in zip(L,L[1:]):
    x = i_curr + i_next
    if x > mx:
        mx = x
    #print(i_curr,i_next)
print("\nMaximum of pairs:",mx)

mx = L[0] + L[1]
for i in range(1,len(L)-1):
    x = L[i] + L[i+1]
    if x > mx:
        mx = x
    #print(L[i],L[i+1])
print("\nMaximum of pairs:",mx)
									

Код (Pascal)

program Minmax24;
 
var
  R1,R2,MaxSum:Real;
  N,i:Integer;
 
begin
  MaxSum:=0;
  R1:=0;
  R2:=0;
  Write('N:');
  Readln(N);
  for i:=1 to N do
   begin
     R2:=R1;
     Write(i,' число:');
     Readln(R1);
 
 
     if i=2 then MaxSum:=R2+R1;
     if R1+R2>MaxSum then MaxSum:=R2+R1;
 
    end;
   writeln(MaxSum);
end.
									




Minmax. Абрамян
Minmax 1 Просмотров: 37
Minmax 2 Просмотров: 26
Minmax 3 Просмотров: 21
Minmax 4 Просмотров: 17
Minmax 5 Просмотров: 27
Minmax 6 Просмотров: 35
Minmax 7 Просмотров: 32
Minmax 8 Просмотров: 19
Minmax 9 Просмотров: 24
Minmax 10 Просмотров: 18
Minmax 11 Просмотров: 46
Minmax 12 Просмотров: 32
Minmax 13 Просмотров: 34
Minmax 14 Просмотров: 24
Minmax 15 Просмотров: 28
Minmax 16 Просмотров: 21
Minmax 17 Просмотров: 26
Minmax 18 Просмотров: 25
Minmax 19 Просмотров: 22
Minmax 20 Просмотров: 34
Minmax 21 Просмотров: 32
Minmax 22 Просмотров: 20
Minmax 23 Просмотров: 24
Minmax 24 Просмотров: 29
Minmax 25 Просмотров: 17
Minmax 26 Просмотров: 38
Minmax 27 Просмотров: 29
Minmax 28 Просмотров: 26
Minmax 29 Просмотров: 29
Minmax 30 Просмотров: 28

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться