По разделам

 

Решение задачи Array 39


Дан массив размера N. Найти количество его промежутков монотонности (то есть участков, на которых его элементы возрастают или убывают).

Код (C/C++)

#include <stdio.h>
 
int main(void)
{
    int a[10];
    int n;
 
    printf("N: ");
    scanf("%i",&n);
 
    int i,num=0;
    for (i=0; i<n; ++i){
        printf("a[%i] : ",i+1);
        scanf("%i",&a[i]);
    }
 
    for (i=2;i<n;++i){
        if ((a[i-2]>a[i-1]) && !(a[i-1]>a[i])){
            ++num;
        }
        if ((a[i-2]<a[i-1]) && !(a[i-1]<a[i])){
            ++num;
        }
    }
 
    if (a[n-2]!=a[n-1]) ++num;
 
    printf("%i \n",num);
    return 0;
}

Код (Python)

import random

N = random.randrange(2,21)
#N = 15
a = [random.randrange(1,10) for i in range(N)]

##N = 12
##a = [6, 5, 3, 5, 5, 2, 4, 9, 8, 8, 2, 6]
##a = [3, 3, 1, 8, 9, 6, 9, 2, 6, 6, 2, 6, 2, 9, 6]
#a = [7, 2, 1, 8, 2, 8, 6, 9, 9, 2, 2, 2, 8, 9, 5]

##for i in range(0,N):
##    a[i] = N - i
##a[7] = 0
##a = [17, 13, 15]

print("N = ", N)
print("Array:")
print(a)

dec_k = 0
dec_flag = True
for i in range(1,N):
    if a[i-1] > a[i] :
        if dec_flag:
            dec_k += 1
            dec_flag = False
    else :
        dec_flag = True
print("Monotonous Decrease intervals:",dec_k)

inc_k = 0
inc_flag = True
for i in range(1,N):
    if a[i-1] < a[i] :
        if inc_flag:
            inc_k += 1
            inc_flag = False
    else :
        inc_flag = True
print("Monotonous Increase intervals:",inc_k)

print("Monotonous intervals:",inc_k+dec_k)

import matplotlib.pyplot as plt
plt.plot(a)
plt.show()
									

Код (Pascal)

program Array39;
var
  a:array[1..10] of integer;
  N,i,Num:Integer;
 
begin
  a[1]:=0;
  Write('N: ');
  Readln(N);
  for i:=1 to N do
   begin
    write(i,' :');
    readln(a[i]);
   end;
 
  Num:=0;
 
  for i:=3 to N do
  begin
    if (a[i-2]>a[i-1]) and not(a[i-1]<a[i]) then inc(Num);
    if (a[i-2]<a[i-1]) and not(a[i-1]>a[i]) then inc(Num);
  end;
  if not(a[N-1]=a[N]) then inc(Num);
 
 
  Writeln(Num);
  readln;
end.
									




Array. Абрамян
Array 1 Просмотров: 10053
Array 2 Просмотров: 6952
Array 3 Просмотров: 5666
Array 4 Просмотров: 4835
Array 5 Просмотров: 6541
Array 6 Просмотров: 4497
Array 7 Просмотров: 4403
Array 8 Просмотров: 4690
Array 9 Просмотров: 4213
Array 10 Просмотров: 3870
Array 11 Просмотров: 4636
Array 12 Просмотров: 3717
Array 13 Просмотров: 3304
Array 14 Просмотров: 2808
Array 15 Просмотров: 4360
Array 16 Просмотров: 3374
Array 17 Просмотров: 3260
Array 18 Просмотров: 4369
Array 19 Просмотров: 2899
Array 20 Просмотров: 4616
Array 21 Просмотров: 2634
Array 22 Просмотров: 2383
Array 23 Просмотров: 2805
Array 24 Просмотров: 2622
Array 25 Просмотров: 2167
Array 26 Просмотров: 2829
Array 27 Просмотров: 2325
Array 28 Просмотров: 3025
Array 29 Просмотров: 1754
Array 30 Просмотров: 2572
Array 31 Просмотров: 2021
Array 32 Просмотров: 2403
Array 33 Просмотров: 1768
Array 34 Просмотров: 2071
Array 35 Просмотров: 1452
Array 36 Просмотров: 1533
Array 37 Просмотров: 3041
Array 38 Просмотров: 1615
Array 39 Просмотров: 1666
Array 40 Просмотров: 1878
Array 41 Просмотров: 1687
Array 42 Просмотров: 1338
Array 43 Просмотров: 1608
Array 44 Просмотров: 1484
Array 45 Просмотров: 1542
Array 46 Просмотров: 1349
Array 47 Просмотров: 1776
Array 48 Просмотров: 2879
Array 49 Просмотров: 1759
Array 50 Просмотров: 1304
Array 51 Просмотров: 2111
Array 52 Просмотров: 1953
Array 53 Просмотров: 1504
Array 54 Просмотров: 1497
Array 55 Просмотров: 1372
Array 56 Просмотров: 1227
Array 57 Просмотров: 1462
Array 58 Просмотров: 1365
Array 59 Просмотров: 1743
Array 60 Просмотров: 1260
Array 61 Просмотров: 1212
Array 62 Просмотров: 2071
Array 63 Просмотров: 1616
Array 64 Просмотров: 1328
Array 65 Просмотров: 1705
Array 66 Просмотров: 1550
Array 67 Просмотров: 1268
Array 68 Просмотров: 2423
Array 69 Просмотров: 1843
Array 70 Просмотров: 1731
Array 71 Просмотров: 1455
Array 72 Просмотров: 1375
Array 73 Просмотров: 1156
Array 74 Просмотров: 1393
Array 75 Просмотров: 1566
Array 76 Просмотров: 1385
Array 77 Просмотров: 1174
Array 78 Просмотров: 1386
Array 79 Просмотров: 1155
Array 80 Просмотров: 1130
Array 81 Просмотров: 1041
Array 82 Просмотров: 929
Array 83 Просмотров: 847
Array 84 Просмотров: 837
Array 85 Просмотров: 985
Array 86 Просмотров: 1453
Array 87 Просмотров: 842
Array 88 Просмотров: 894
Array 89 Просмотров: 934
Array 90 Просмотров: 1722
Array 91 Просмотров: 1082
Array 92 Просмотров: 1328
Array 93 Просмотров: 1326
Array 94 Просмотров: 1136
Array 95 Просмотров: 1543
Array 96 Просмотров: 1263
Array 97 Просмотров: 1137
Array 98 Просмотров: 1851
Array 99 Просмотров: 1089
Array 100 Просмотров: 1052
Array 101 Просмотров: 1101
Array 102 Просмотров: 831
Array 103 Просмотров: 897
Array 104 Просмотров: 876
Array 105 Просмотров: 705
Array 106 Просмотров: 1091
Array 107 Просмотров: 930
Array 108 Просмотров: 991
Array 109 Просмотров: 925
Array 110 Просмотров: 998
Array 111 Просмотров: 871
Array 112 Просмотров: 1685
Array 113 Просмотров: 1205
Array 114 Просмотров: 1049
Array 115 Просмотров: 1163
Array 116 Просмотров: 2113
Array 117 Просмотров: 1600
Array 118 Просмотров: 865
Array 119 Просмотров: 762
Array 120 Просмотров: 939
Array 121 Просмотров: 884
Array 122 Просмотров: 955
Array 123 Просмотров: 912
Array 124 Просмотров: 785
Array 125 Просмотров: 811
Array 126 Просмотров: 749
Array 127 Просмотров: 756
Array 128 Просмотров: 830
Array 129 Просмотров: 834
Array 130 Просмотров: 872
Array 131 Просмотров: 1064
Array 132 Просмотров: 838
Array 133 Просмотров: 753
Array 134 Просмотров: 1175
Array 135 Просмотров: 664
Array 136 Просмотров: 885
Array 137 Просмотров: 763
Array 138 Просмотров: 684
Array 139 Просмотров: 836
Array 140 Просмотров: 1370

Комментарии

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



Заявка на расчет