По разделам



Задача Series 24


Дано целое число N и набор из N целых чисел, содержащий по
крайней мере два нуля. Вывести сумму чисел из данного набора, расположенных между последними двумя нулями (если последние нули идут
подряд, то вывести 0).

Код (C/C++)

#include <stdio.h>
int main(void)
{
    int n;
    printf("N:");
    scanf("%i", &n);
    int i,r,sum=0,tempsum=0;
    for (i=1; i<=n; ++i){
        printf(">");
        scanf("%i", &r);
        tempsum+=r;
        if (r==0){
            sum=tempsum;
            tempsum=0;
        }
    }
    printf("%i\n",sum);
    return 0;
}

Код (Python)

import random

N = random.randrange(5,15)
Z = random.randrange(2,6)

L1 = [random.randrange(1,5) for i in range(0,N)]
L2 = [0 for i in range(0,Z)]
L = L1 + L2

print(L1)
print(L2)
random.shuffle(L)
print(L)

s = 0
for x in L:
    if x == 0:
        s_last = s
        s = 0
    else:
        s += x

print("Sum = ",s_last)
									

Код (Pascal)

program Series24;
var
  i,N,Num,Sum,SumTemp :Integer;
begin
 Write('N:');
 Readln(N);
 SumTemp:=0;
 for i:=1 to N do
   begin
    write('Введите ',i,' элемент из набора :');
    Readln(Num);
    SumTemp:=SumTemp+Num;
    if Num=0 then
     begin
      Sum:=SumTemp;
      SumTemp:=0;
     end;
   end;
 Writeln(Sum);
end.
									




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

Комментарии

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