Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Бинарный и интерполяционный поиск - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Запись и чтение с файла http://www.cyberforum.ru/cpp-beginners/thread194237.html
Подскажите пожалуйста как правильно записать массив в файл и считать его оттуда в другой массив? Если можно пример кода не в чистом с,а в с++ Спасибо!
C++ типы указателей Помогите понять, что от меня хотят в этом задании: "выбрать данные из памяти с помощью разных типов указателей (float, char)" http://www.cyberforum.ru/cpp-beginners/thread194229.html
C++ массивы, new и delete
Здравствуйте. Подскажите пожалуйста, чем отличается допустим символьный массив char s="hello"; от char *s1=new char ? Тоесть в смысле чем отличается выделение памяти? И ещё хотел узнать, допустим...
Нужно что бы пароль и имя записывались в файл, как исправить? C++
#include <iostream> #include <stdlib.h> #include <time.h> #include <conio.h> #include <fstream> using namespace std; int main() { int const L=5, J=20;
C++ задача на цикл http://www.cyberforum.ru/cpp-beginners/thread194207.html
Для каждого из некоторого количества пар чисел M,N найти все простые общие делители. Не могу понять как в цикле сделать это, или проше через функцию задать чтобы находились числа для каждого а...
C++ замена символа при выводе из файла Есть задача: Написать программу, которая позволяет пользователю ввести произвольную строку, считывает количество символов в ней и сохраняет это число в переменную count. Потом выводит ответ(варианты... подробнее

Показать сообщение отдельно
Надек8
3 / 0 / 0
Регистрация: 13.10.2010
Сообщений: 32
14.12.2010, 00:39  [ТС]
Program poisk;
var
a: array [1..20] of integer;
i,j,x,n,nx,c,r,l:integer;
flag:boolean;
begin
writeln('Ââåäèòå ðàçìåð è ýëåìåò äëÿ ïîèñêà');
readln(n,x);
writeln('Èñõîäíûé ìàññèâ');
for i:=1 to n do
read(a[i]);
write(a[i]:4);
writeln;
i:=0;
repeat
i:=i+1;
flag:=false;
for j:=n-1 downto i do
if a[j] > a[j+1] then begin
c:=a[j]; a[j]:=a[j+1]; flag:=true;
end;
until not flag;
nx:=0; l:=1; r:=n;
begin
while l <= r do begin
c:=(l+r) div 2;
if x=a[c] then begin
nx:=c; r:=l-1;
end;
if x > a[c] then r:=c-1;
if x < a[c] then l:=c+1;
end;
writeln('Îòñîðòèðîâàííûé ìàññèâ');
for i:=1 to n do
write(a[i]:4);
if nx=0 then writeln('Íå íàéäåí')
else writeln('×èñëó x',x,'ðàâåí ýëåìåíò',a[nx])
end;
begin
while l <= r do begin
c:=l+(r-1)*(x-a[l]) div (a[r]-a[l]);
if x=a[c] then begin
nx:=c; r:=l-1;
end;
if x > a[c] then r:=c-1;
if x < a[c] then l:=c+1;
end;
writeln('Îòñîðòèðîâàííûé ìàññèâ');
for i:=1 to n do
write(a[i]:4);
if nx=0 then writeln('Íå íàéäåí')
else writeln('×èñëó x',x,'ðàâåí ýëåìåíò',a[nx])
end;
end.
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru