// Аня_Бобякина_2011-11-27-6
#include <iostream>
#include <ctime>
using namespace std;
#define N 10
#define LIMIT 10
void main()
{
double r, a[N], x, min, index = 0, del = 1.0131;
min = LIMIT * del;
srand((unsigned) time(NULL));
cout << " Input R: "; cin >> r; cout << endl;
for (int n = 0; n < N; n++)
{
x = rand() % LIMIT;
a[n] = x * del;
cout << ' ' << a[n];
if (min > abs(a[n] - r))
{
min = abs(a[n] - r);
index = n;
}
}
cout << "\n\n The most approached element a[" << index << "]. Approach = " << min;
fflush(stdin);
cin.get();
}
Другие языки программирования и технологии
Дано вещественное число R и массив размера N. Найти элемент массива, который наименее близок к данному числу
нашел.
ты хоть язык назови..
#include <stdlib.h>
#include <iostream>
#include <locale>
#define N 10
int main(int argc, _TCHAR* argv[])
{
setlocale(LC_ALL,"Russian");
double a[N]={10,21,12,31,41,25,36,47,48,19};
double R;
std::cout << "Введите R : " ;
std::cin >> R; std::cout << std::endl ;
double MAX = a [ 0 ];
double max = abs( R - a [ 0 ] );
std::cout << "a " << " R-a" << std::endl ;
std::cout << a [ 0 ] << " : " << max << std::endl;
for(int i = 1 ; i < N ; i++)
if(max < abs( R - a [ i ] ))
{
max = abs(R - a [ i ] );
std::cout << a [ i ] << " : " << max << std::endl;
MAX = a [ i ] ;
}
std::cout << "Наименее близок элемент " << MAX << std::endl;
system("PAUSE");
return 0;
}
#include <iostream>
#include <locale>
#define N 10
int main(int argc, _TCHAR* argv[])
{
setlocale(LC_ALL,"Russian");
double a[N]={10,21,12,31,41,25,36,47,48,19};
double R;
std::cout << "Введите R : " ;
std::cin >> R; std::cout << std::endl ;
double MAX = a [ 0 ];
double max = abs( R - a [ 0 ] );
std::cout << "a " << " R-a" << std::endl ;
std::cout << a [ 0 ] << " : " << max << std::endl;
for(int i = 1 ; i < N ; i++)
if(max < abs( R - a [ i ] ))
{
max = abs(R - a [ i ] );
std::cout << a [ i ] << " : " << max << std::endl;
MAX = a [ i ] ;
}
std::cout << "Наименее близок элемент " << MAX << std::endl;
system("PAUSE");
return 0;
}
Похожие вопросы
- C# Дан массив размера N. Найти 2 элемента массива, сумма которых наиболее близка к максимуму массива и поменять
- Pascal . Дан массив вещественных чисел. Найти сумму элементов, номера которых являются простыми числами
- Дано натуральное число n и вещественная матрица размера n X 9 . Плиз помогите(
- Как срандомить случайные вещественные числа N и занести их в массив? C++
- Составить программу С++ В массиве целых чисел с количеством элементов n найти наиболее часто встречающееся число
- Найти элементы, принадле-жащие и тому и другому массивам на C++
- Даны два массива A и B размера N, элементы которых упорядочены по убыванию. Объединить эти массивы так, чтобы результ
- Помогите решить на ПАСКАЛЕ!Увеличить четные числа массива размера N,на исходное значение первого четного числа.
- Дан прямоугольный целочисленный массив размером N*N. Определить является ли данный массив магическим квадратом, т.е. сум
- Как написать программу, которая будет представлять вещественное число в памяти компьютера