По разделам



Задача Series 19


Дано целое число N (> 1) и набор из N целых чисел. Вывести те
элементы в наборе, которые меньше своего левого соседа, и количество K
таких элементов.

Код (C/C++)

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

Код (Python)

import random

N = random.randrange(1,20)
print("N = ",N)

x = random.randrange(1,10)
print(x,end="; ")
x_prev = x
k = 0
for i in range(1,N):
    x = random.randrange(1,10)
    if x < x_prev:
        k += 1
        print("*{0}".format(x),end="; ")
    else:
        print(x,end="; ")
    x_prev = x
print()
print("K = ",k)
									

Код (Pascal)

program Series19;
var
  i,K,N,Num,Num1 :Integer;
begin
 Write('N:');
 Readln(N);
 K:=0;
 for i:=1 to N do
   begin
    write('Введите',i,' элемент :');
    Readln(Num);
    if (Num1>Num) and (i<>1) then
     begin
      writeln(Num);
      inc(K);
     end;
     Num1:=Num;
   end;
  Writeln(K);
  readln;
end.
									

Дополнительно

n = int(input())
t = int(input())
a = []
for i in range(n - 1):
    temp = int(input())
    if temp < t:
        a.append(temp)
    t = temp
print(len(a))
for i in a:
    print(i, 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 Просмотров: 17
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

Комментарии

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