C/C++

lxa85 · Отправлено: **03:46, 17-05-2011** | #11

Большая большая просьба. В следующий раз комментарии пиши, пожалуйста. Хотя бы по блочно.
Допустим 1 - получение массива не повторяющихся чисел.
2 - задание 1) <текст задания>
3 - задание 2) <текст задания>

a[i]:=random(nn)+random; -> a[i]:=random(nn) // +random - лишняя операция
kilk2:=kilk2; // это еще что такое?!?
Вообще, в данном коде

Цитата trey_tao:

Код:

kilk2:=0;
for i:=0 to n do
 begin
 kilk:=0;
 for j:=0 to n do
 if (b[j]=a[i]) then
 begin
 kilk2:=kilk2;
 break;
 end;
 end;

»

переменные kilk и kilk2 не участвуют.
Соотв. условие if (kilk2<>ss) не имеет смысла. Тем более, что переменная ss не имеет значения. Т.е. она может быть ровна - чему угодно.
Writeln где-нибудь поставь. Т.к. код вроде верен, но глаз "цепляется", скорей всего из-за неправильного использования kilk. Но проверь.
Последовательность B больше последовательности A. Почему у тебя единый счетчик до n=25 ?
Во втором задании схожие ошибки.

trey_tao · Отправлено: **16:45, 17-05-2011** | #12

Цитата lxa85:

Почему у тебя единый счетчик до n=25 ? »

потому что у нас в задании сказано что массив А от 1 к 25
та да здесь ошибок много но может мне кто нить помочь переписать это на С++?? плз

lxa85 · Отправлено: **19:46, 17-05-2011** | #13

да елки палки, я знаю, что массив A от 1 до 25, я тебя про массив B спрашивал. Он 25 тью значениями не ограничен!
----
Сначала на паскале ошибки исправь, на С++ переписать - дело техники.

trey_tao · Отправлено: **17:35, 18-05-2011** | #14

вот я исправил программу на Паскале плз помогите её переписать на С++

Код:

uses crt;
const
     n=25;
     m=30;
     mm=35;
     nn=30;
var
   a:array[0..n] of integer;
   b:array[0..m] of integer;
   min,max:real;
   ss,tt,i,j,flag:integer;
   kilk,kilk2:integer;
begin
     clrscr;
     randomize;
          for i:=0 to n do
     begin
          a[i]:=random(nn)+random(n);
          for j:=0 to i-1 do
              if(a[i]=a[j]) then
              begin
                   a[i]:=random(nn)+random(n);
                   i:=1;
                   break;
              end;
     end;
writeln('Posledivatelnost A');
for i:=0 to n do  write(a[i]:5);
for i:=0 to m do
    begin
         b[i]:=random(mm)+random(m);
         for j:=0 to i-1 do
             if (b[i]=b[j]) then
             begin
                  b[i]:=random(mm);
                  i:=j;
                  break;
             end;
    end;
writeln;
writeln;
writeln('Posledovatelnost B');   read(ss);
for i:=0 to ss do write(b[i]:5);
kilk:=0;
for i:=0 to ss do
    begin
         kilk:=0;
         for j:=0 to n do
             if (b[i]=a[j]) then
             begin
                  kilk:=b[i];

             end;
    end;
writeln;
writeln('Zadanie G');
if (kilk<>ss) then writeln('Ymova ne vikonyetsya') else writeln('Vse cheni posledovatelnosti A ne vhodyat v posledovatelnost B');
writeln;
writeln('Zadanie B');
flag:=0;
for i:=0 to ss do
begin
    for j:=0 to n do
        if (b[i]=a[j]) then flag:=1;
if(flag=0) then write(b[i]:5);
flag:=0;
end;
readkey;
end.

lxa85 · Отправлено: **19:36, 18-05-2011** | #15

Цитата trey_tao:

for j:=0 to n do
if (b[i]=a[j]) then
begin
kilk:=b[i];
end; »

Смысл этого цикла, если в следующей итерации "старшего" цикла kilk сбросится в ноль?

Цитата trey_tao:

Код:

for i:=0 to ss do
 begin
 kilk:=0;
 for j:=0 to n do
    ....
 end;

»

и все будет оцениваться [ if (kilk<>ss) then ] по последнему числу в массиве, что не есть верно.
Весь остальной код явных подозрений не вызывает.

trey_tao · Отправлено: **22:14, 18-05-2011** | #16

Цитата lxa85:

Цитата trey_tao:
for j:=0 to n do
if (b[i]=a[j]) then
begin
kilk:=b[i];
end; » »

мы вроде тут проверяем условие если елемент с последовательности Б входит в последовательность А то мы его не выводим кажись так

lxa85 · Отправлено: **04:52, 19-05-2011** | #17

ночь я так понял прошла, наступил день, светит солнце и приносит в голову трезвые правильные мысли.
trey_tao, еще разочек. Что надо исправить(дописать) в коде, чтобы смысл строки [i]kilk:=b; остался в силе?
Задумку я твою понял, ее надо самую малость довести до ума.
И условие if (kilk<>ss) ... мне не нравится совершенно. В основном из-за неправильно написанного предыдущего цикла.
Посмотри еще раз внимательно и не торопясь.

trey_tao · Отправлено: **08:40, 19-05-2011** | #18

Цитата lxa85:

И условие if (kilk<>ss) ... мне не нравится совершенно. »

да наверно тут нужно проверять не тот символ что мы ввели а тот что уже проверили на совпадения.....тут наверно нужно вводить (kilk<>b[i]) ...

lxa85 · Отправлено: **22:31, 19-05-2011** | #19

trey_tao, честно, я ничего не понял, что ты хотел сказать. Верней не понял, как ты собирался это сделать.

Цитата trey_tao:

тут наверно нужно вводить (kilk<>b[i]) ... »

глупость. klik - имеет не правильный способ получения и как следствие неправильно сравнение, см выше. Вероятность выполнения данного (kilk<>b[i]) условия - очень мала.

P.S. Хотя надо сказать спасибо, уже за то, что делаются осознанные попытки решить задачу.
Имел общение с представительством студенчества. После чего очень сильно хотелось выпить...