Array37. Дан массив размера N. Найти количество участков, на которых его элементы монотонно возрастают.
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | program Array37; 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 if (a[i-2]<a[i-1]) and not(a[i-1]<a[i]) then inc(Num); if a[N-1]<a[N] then inc(Num); Writeln(Num); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | #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[n-2]<a[n-1]) ++num; printf("%i \n",num); return 0; } |
хрень
решение
Хрень
Твоя мама
JAVA
import java.util.Scanner;
public class arr37 {
public static void main(String[] args) {
Scanner sc = new Scanner(System.in);
System.out.print(«Enter n: «);
int n = sc.nextInt();
int[] a = new int[n];
for (int i = 0; i < n; i++) {
a[i] = sc.nextInt();
}
int count = 1;
for (int i = 1; i < a.length; i++) {
if (a[i] <= a[i — 1]) count++;
}
System.out.println(count);
}
}
на котлине:
var n = 5
var a = IntArray(n)
for ( i in 0..n-1) {
a[i] = readLine()!!.toInt()
}
var k = 0
for(i in 0..n-1) {
if (a[i]==i) {
k++
}
}
println(k)