Даю 50 балло
Дан массив размера N. Найти количество его промежутков моно-тонности (то есть участков, на которых его элементы возрастают или убывают).
Написать код для Лазурус оконное приложение, с использованием ListBox или Memo и соответственно кнопок. Код с пояснением.
Ответы
Ответ:
#include "stdafx.h"
#include "conio.h"
#include "iostream"
using namespace std;
int main()
{
setlocale( LC_ALL,"Russian");// включаем русскую раскладку
cout << "Введите количество элементов массива" << endl;
unsigned int lenthOfArray=0;//переменная длины массива
cin >> lenthOfArray;//считываем длину массива
//создаем Массив
int* Array = new int [lenthOfArray];
int M=1;
cout << "Вводите элементы массива:" << endl;
for(int i=0;i<lenthOfArray;i++)
{
cin >> Array[i];//считываем массив
current=up;
if(i>1)
if((Array[i]>=Array[i-1])&&(Array[i-1]<Array[i-2]))
{
M++;
}
else
{
if((Array[i]<=Array[i-1])&&(Array[i-1]>Array[i-2]))
M++;
}
}
cout << "Количество промежутков монотонности: " << M << endl;
getch();
delete [] Array;
return 0;
}
Добавлено через 7 минут
C++Выделить код
1
current=up;
только это удали
Добавлено через 10 минут
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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#include "stdafx.h"
#include "conio.h"
#include "iostream"
using namespace std;
int main()
{
setlocale( LC_ALL,"Russian");// включаем русскую раскладку
cout << "Введите количество элементов массива" << endl;
unsigned int lenthOfArray=0;//переменная длины массива
cin >> lenthOfArray;//считываем длину массива
//создаем Массив
int* Array = new int [lenthOfArray];
int M=1;
cout << "Вводите элементы массива:" << endl;
for(int i=0;i<lenthOfArray;i++)
{
cin >> Array[i];//считываем массив
if(i>1)
if((Array[i]>Array[i-1])&&(Array[i-1]<Array[i-2]))
{
M++;
}
else
{
if((Array[i]<Array[i-1])&&(Array[i-1]>Array[i-2]))
M++;
else
if((Array[i]==Array[i-1])&&(Array[i-1]!=Array[i-2]))
M++;
}
}
cout << "Количество промежутков монотонности: " << M << endl;
getch();
delete [] Array;
return 0;
}
Объяснение: