Дан массив, состоящий из целых чисел. напишите программу, - вопрос №5506112 от Ilya2569 30.04.2020 15:41

Question

Информатика: Дан массив, состоящий из целых чисел. напишите программу, которая подсчитает количество элементов массива, больших предыдущего (элемента с предыдущим номером). входные данные сначала задано число n — количество элементов в массиве (1n10000). далее через пробел записаны n чисел — элементы массива. массив состоит из целых чисел. выходные данные необходимо вывести единственное число - количество элементов массива, больших предыдущего.

Ilya2569 · Answer

//PascalABC.NET 3.1 сборка 1200begin    var a := ReadArrInteger(ReadInteger());    Println(a);        var k := 0;    for var i := Low(a) + 1 to High(a) do        if a[i - 1] a[i] then k += 1;        writeln(k);end....