ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #2091  
Старый 24.12.2009, 19:54
Nelson17
Новичок
Регистрация: 03.12.2008
Сообщений: 13
Провел на форуме:
34545

Репутация: 0
По умолчанию

Дана целочисленная матрица размера m на n. Размер матрицы задается динамически во время выполнения программы. Для хранения элементов матрицы использовать динамическое выделение памяти. Матрица заполняется случайными числами в диапазоне от -50 до 50. Используя алгоритм пузырьковой сортировки отсортировать элементы каждой четной строки по возрастанию, а нечетную - по убыванию. Заполнение матрицы случайными числами, сортировку элементов строк матрицы и вывод матрицы на экран организовать в виде функции.
Задание вроде не сильное с первого взгляда, но написать не могу. Помогите по-возможности. С++

Точно в С++! Создать два файла сpp и заголовочный файл. Написать отдельную функцию, которая сортирует.
Пожалуйста помогите, уже просто срок совсем поджал! Заранее благодарен
 
Ответить с цитированием

[PASCAL]
  #2092  
Старый 24.12.2009, 22:03
P.A.U.L
Познающий
Регистрация: 12.08.2009
Сообщений: 32
Провел на форуме:
482943

Репутация: 0
Отправить сообщение для P.A.U.L с помощью ICQ
По умолчанию [PASCAL]

Помогите плз доделать лабу...

В коде чего то не хватает для нормальной работы программы, но только понять не могу чего...

Здача:
Составить функцию, которая возвращает значение 0, если в последовательности целых чисел а1,а2,...аn отсутствуют три соседних нечетных числа, или номер первого числа встретившейся тройки таких чисел...

Код:

Код:
program proverka;
uses crt;
const n=10;
var c,i:integer;

function proverk (var a:array of integer):integer;
  var i,j:integer;
  begin
    for i:=1 to n-2 do
      if b[i] mod 2 <> 0 then
	if b[i+1] mod 2 <> 0 then
	  if b[i+2] mod 2 <> 0 then
	    begin
	     proverk:=i;
	     exit;
	    end;
      proverk:=0;
  end;
begin
 clrscr;
  for i:= 1 to n do begin
  readln(a[i]);
  c:=proverk(a[i]);
  write('   ',c);
  writeln;
  end;
end.
 
Ответить с цитированием

  #2093  
Старый 24.12.2009, 23:19
n1ghtstalker
Познающий
Регистрация: 28.09.2008
Сообщений: 65
Провел на форуме:
152084

Репутация: 8
По умолчанию

Цитата:
Сообщение от P.A.U.L  
Помогите плз доделать лабу...

В коде чего то не хватает для нормальной работы программы, но только понять не могу чего...

Здача:
Составить функцию, которая возвращает значение 0, если в последовательности целых чисел а1,а2,...аn отсутствуют три соседних нечетных числа, или номер первого числа встретившейся тройки таких чисел...

Код:

Код:
program proverka;
uses crt;
const n=10;
var c,i:integer;

function proverk (var a:array of integer):integer;
  var i,j:integer;
  begin
    for i:=1 to n-2 do 
      if b[i] mod 2 <> 0 then
	if b[i+1] mod 2 <> 0 then
	  if b[i+2] mod 2 <> 0 then
	    begin
	     proverk:=i;
	     exit;
	    end;
      proverk:=0;
  end;
begin
 clrscr;
  for i:= 1 to n do begin
  readln(a[i]);
  c:=proverk(a[i]);
  write('   ',c);
  writeln;
  end;
end.
во первых зачем тебе n? если она у тебя константового типа и =10 .
во вторых откуда взялся массив b?
при том надо прописать случай else.
при том в основном варе не объявлен массив , то что он присутсвует в функции это не значит
что он будет в основной программе.

ps мне интересно каким образом ты эту программу компилировал и таких косяков не нашёл?

Последний раз редактировалось n1ghtstalker; 24.12.2009 в 23:33..
 
Ответить с цитированием

  #2094  
Старый 24.12.2009, 23:43
P.A.U.L
Познающий
Регистрация: 12.08.2009
Сообщений: 32
Провел на форуме:
482943

Репутация: 0
Отправить сообщение для P.A.U.L с помощью ICQ
По умолчанию

n1ghtstalker, ой сорь, чтот я затупил с кодом, видать не сохранил переделанную, а скинул код совсем сырой...

Функция данной задачи должна вроде выглядеть так, а как ее впихнуть в саму программу чет не догоняю, не оч дружу с функциями.
Если тебе не сложно помоги доделать ее по условию задачи...

Код:
function proverk (a:array[1..n] of integer):integer;
  var
    i,j:integer;
  begin
    for i:=1 to n-2 do
      if a[i] mod 2 <> 0 then
        if a[i+1] mod 2 <> 0 then
          if a[i+2] mod 2 <> 0 then
            begin
              proverk:=i;
              exit;
            end;
      proverk:=0;
  end;
 
Ответить с цитированием

  #2095  
Старый 24.12.2009, 23:45
n1ghtstalker
Познающий
Регистрация: 28.09.2008
Сообщений: 65
Провел на форуме:
152084

Репутация: 8
По умолчанию

Цитата:
Сообщение от P.A.U.L  
n1ghtstalker, ой сорь, чтот я затупил с кодом, видать не сохранил переделанную, а скинул код совсем сырой...

Функция данной задачи должна вроде выглядеть так, а как ее впихнуть в саму программу чет не догоняю, не оч дружу с функциями.
Если тебе не сложно помоги доделать ее по условию задачи...

Код:
function proverk (a:array[1..n] of integer):integer;
  var
    i,j:integer;
  begin
    for i:=1 to n-2 do
      if a[i] mod 2 <> 0 then
        if a[i+1] mod 2 <> 0 then
          if a[i+2] mod 2 <> 0 then
            begin
              proverk:=i;
              exit;
            end;
      proverk:=0;
  end;
ты читал мои комментарии? где случай else??
у тебя после всех проверок сначала присваивается значение i , а в конце концов 0 .

+ номер первого числа встретившейся тройки таких чисел... ??? WTF?
скинь всё условие.
при том соседними для к примеру для 4 являются 1,2,3 так и 5,6,7.

Последний раз редактировалось n1ghtstalker; 24.12.2009 в 23:48..
 
Ответить с цитированием

  #2096  
Старый 24.12.2009, 23:48
Algol
Регистрация: 29.05.2002
Сообщений: 1,793
Провел на форуме:
2050916

Репутация: 0


По умолчанию

P.A.U.L, просто ради интереса, ты на каком факультете учишся ?
 
Ответить с цитированием

  #2097  
Старый 24.12.2009, 23:51
Algol
Регистрация: 29.05.2002
Сообщений: 1,793
Провел на форуме:
2050916

Репутация: 0


По умолчанию

Цитата:
Сообщение от n1ghtstalker  
у тебя после всех проверок сначала присваивается значение i , а в конце концов 0 .
Да не, в функции у него все относительно нормально
 
Ответить с цитированием

  #2098  
Старый 24.12.2009, 23:57
n1ghtstalker
Познающий
Регистрация: 28.09.2008
Сообщений: 65
Провел на форуме:
152084

Репутация: 8
По умолчанию

Цитата:
Сообщение от Algol  
Да не, в функции у него все относительно нормально
ну ты посмотри по шагам, оно и выходит относительно. оно значения i элемента не даст.а вернёт 0. после всех циклов допустим proverk=5;
потом ей же значение 0....
мож это эконом какой нибудь?)
 
Ответить с цитированием

  #2099  
Старый 25.12.2009, 00:00
Algol
Регистрация: 29.05.2002
Сообщений: 1,793
Провел на форуме:
2050916

Репутация: 0


По умолчанию

Цитата:
Сообщение от n1ghtstalker  
ну ты посмотри по шагам, оно и выходит относительно. оно значения i элемента не даст.а вернёт 0. после всех циклов допустим proverk=5;
потом ей же значение 0....
мож это эконом какой нибудь?)
В паскале exit это выход из процедуры. Ты видимо путаешь с break в си
 
Ответить с цитированием

  #2100  
Старый 25.12.2009, 00:03
P.A.U.L
Познающий
Регистрация: 12.08.2009
Сообщений: 32
Провел на форуме:
482943

Репутация: 0
Отправить сообщение для P.A.U.L с помощью ICQ
По умолчанию

Если поможете буду оч признателен...

Последний раз редактировалось P.A.U.L; 25.12.2009 в 16:38..
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сюда выкладываем все проги для фрикринга мобильников, которых знаем! nigger Сотовый фрикинг 5 11.04.2009 11:15
Американским студентам запретили пользоваться Skype KPOT_f!nd Мировые новости 1 28.09.2006 03:47
Любителям квестов сюда!! FoX's Болталка 10 25.01.2005 20:42



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ