|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.05.2013, 19:24 | #1 |
Форумчанин
Регистрация: 22.05.2013
Сообщений: 245
|
пересечение двух массивов
так же есть код на Паскале,не получается переделать на С++(скажите,а Visual Studio от Dev C++ существенно отличается?и чем?) Вот код:
Program P5; uses crt; const N=10; Type vector=array [1..N] of integer; vector2=array [1..2*N] of integer; Var x:vector; y:vector; z:vector2; i:byte; k:integer; j:integer; begin ClrScr; randomize; {заполнение массива случайными числами} for i:=1 to N do x[i]:=random(20); writeln ('массив x:'); for i:=1 to N do write(x[i]:4); writeln; for j:=1 to N do y[j]:=random(20); writeln ('массив y:'); for j:=1 to N do write(y[j]:4); writeln; k:=1; for i:=1 to N do for j:=1 to N do begin if x[i]=y[j] then begin z[k]:=x[i]; k:=k+1; end; end; {вывод массива* z} writeln('массив z:'); for i:=1 to k-1 do write(z[i]:4); writeln; if (x[i]<>y[j]) and (k=1) then writeln('пересечения нет'); readkey; end. |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
пересечение массивов на С++ | drakon803 | Помощь студентам | 4 | 09.12.2012 10:29 |
Пересечение двух одномерных массивов | Yakov112 | Общие вопросы C/C++ | 2 | 12.10.2012 14:16 |
найти пересечение двух прямоугольников заданных координатами двух углов | Этотак | Помощь студентам | 0 | 11.05.2011 23:55 |
Множественное пересечение массивов | *)(oDoS* | Помощь студентам | 2 | 13.12.2010 14:20 |
пересечение массивов на паскале | SeReGa48 | Помощь студентам | 2 | 13.04.2010 15:59 |