Сессия. Информатика и математика

Discussion in 'PHP' started by banned, 9 Dec 2008.

  1. banned

    banned Banned

    Joined:
    20 Nov 2006
    Messages:
    3,324
    Likes Received:
    1,193
    Reputations:
    252
    В этой теме Вам могут помогут с контрольными работами, зачетами и прочими вопросами по учебной дисциплине Информатика и(или) математика.

    За каждый хороший ответ/решение Вам будет начислена репутация..

    В теме могут задавать вопросы пользователи с сообщением или репутацией более 100!!!!
    Ответы могут писать все!!


    За темой строго буду следить я.

    Модераторам: Пожалуйста не надо никуда переносить тему..В болталке она не уживется, умрет под троллями!
     
    #1 banned, 9 Dec 2008
    Last edited: 9 Dec 2008
  2. banned

    banned Banned

    Joined:
    20 Nov 2006
    Messages:
    3,324
    Likes Received:
    1,193
    Reputations:
    252
    ВОПРОС №1

    Я начну, спасибо!

    Контрольная работа, 2й семестр, выполнить до 2 мая.
    Информатика и математика.
    №1
    В массивы вводятся элементы двух последовательностей Ai и Bj целых чисел, которые содержат 6 и 8 элементов соответственно. Ai - неубывающая и Bj - невозрастающая последовательности. Необходимо вывести на экран общий список значений элементов этих последовательностей по их убыванию. Предусмотреть проверку правильности ввода информации.
    №2
    Вести текст длиной до 254 символов в виде строки. Убрать из текста все знаки "+", непосредственно за которыми следует цифра. Вывести на экран новый текст и количество удаленных знаков.

    --------------
    Эти задания необходимо выполнить на любом языке программирования. :)
    Я вообще не всёк что тут надо сделать....
     
    #2 banned, 9 Dec 2008
    Last edited: 9 Dec 2008
    1 person likes this.
  3. Kaimi

    Kaimi Well-Known Member

    Joined:
    23 Aug 2007
    Messages:
    1,732
    Likes Received:
    811
    Reputations:
    231
    ВОПРОС №2

    [​IMG]
     
    _________________________
    #3 Kaimi, 9 Dec 2008
    Last edited by a moderator: 9 Dec 2008
    1 person likes this.
  4. P3L3NG

    P3L3NG Banned

    Joined:
    4 Jun 2008
    Messages:
    175
    Likes Received:
    204
    Reputations:
    11
    ВОПРОС №3

    Входные строки представляют собой последовательности слов, разделенных пробелами, запятыми, табуляциями или границами строк. В соответствии с вариантом задания составить Пас-каль-программу проверки характеристик введённых последовательностей слов и печати развёрну-того ответа. Тестирование проводить не менее чем на трёх строках вплоть до конца входного фай-ла. В качестве алфавита берется один из европейских алфавитов, соответствующих заданию (рус-ский, английский, ...).

    Само задание: Есть ли слово, хотя бы одна согласная которого повторяется?

    вот что набросал, всвязи с последними событиями не успеваю отладить :(

    Code:
    program laba8;
    uses crt;
    label konec;
    Var
      i, n, k, x, od, symb:Integer;
      {n - kolvo probelov}
      st, st2:String;
      a, b:Char;
      f:text;
      c: set of Char;
      m: Boolean;
      Dlina:array[1..100] of integer;
    begin
      i:=0;
      n:=0;
      k:=0;
      od:=0;
      symb:=0;
      c:=['a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','w','x','y','z',' ',','];
      write('BBedite put faila i ego imya - ');
      readln(st);
      assign(f, st);
      rewrite(f);
      write('Vvedite text: ');
      readln(st);
      st2:=st+' ';
      writeln(f, st2);
      reset(f);
    
    {proverka korrektnosti  
      While not eof(f) Do
      begin
      read(f,a);
      m:=a in c;
      if m=False then writeln('v stroke est nekorrektnie simvoli');
      readkey;
      write('najmite anykey dlya zaversheniya programmi');
      GOTO konec;
      end;
      }
      
    {kol-vo slov}
      While not eof(f) Do
        begin
         While not eoln(f) Do
           begin
            read(f,a);
            m:=a in c;
            If (a<>' ') and (a<>',') Then k:=k+1;
             
            If (a=' ') or (a=',') Then
               If k=0 Then
                  begin
                    n:=n+1;
                    Dlina[n]:=k;
                    k:=0;
                  end;     
          end;
        readln(f);
       end;
    writeln('dlini slov ',Dlina[1] ,'   ',Dlina[2] ,'   ',Dlina[3] ,'   ',Dlina[4] ,'   ');
    writeln('probelov ',n);
    readkey;
    {proverka na odinakovost}
    for k:=1 to n do
      for i:=1 to Dlina[n] do
          begin
          symb:= symb + Dlina[n];      
          reset(f);
            for x:=1 to symb do read(f);
              read(f,a);      
                for x:=1 to Dlina[n] do 
                  begin
                  read(f,b);
                   if a=b then inc(od);
                  end;
          end;
              
       
      Append(f);
      writeln(f);
      writeln(f, 'Kolichestvo slov, gde est odinak bukvi ravno: ', od);
      close(f);
      konec:
    end.
    
     
  5. VDShark

    VDShark Elder - Старейшина

    Joined:
    1 Feb 2007
    Messages:
    260
    Likes Received:
    158
    Reputations:
    62
    ОТВЕТ №1
    1.1
    берем 2-ю строку и идем сначала, берем 1-ю строку и идм с конца. Соответствено сравниваем, ищем наибольшее, ставим в строку. Если какая о строка кончилась - то дописываем все из оставшейся строки. Правильность проверяем соответственно что б в первом случае каждое последующее значение было >=, а во второй <=.
    1.2
    Следуем по строке сначала. Если находим + то смотрим след. символ. Если это цифра - организуем циклический сдвиг влево. увеличиваем счетчик (или разностью длин начальной и итоговой строк).

    Вот впринципе и все премудрости
     
    #5 VDShark, 9 Dec 2008
    Last edited by a moderator: 9 Dec 2008
    1 person likes this.
  6. Pashkela

    Pashkela Динозавр

    Joined:
    10 Jan 2008
    Messages:
    2,750
    Likes Received:
    1,044
    Reputations:
    339
    PHP:
    <?
    /*
    Вести текст длиной до 254 символов в виде строки. Убрать из текста все знаки "+", непосредственно за которыми следует цифра. Вывести на экран новый текст и количество удаленных знаков.
    */

    $str "+1+djfgdhfg+w4534+523+sdkh+901Q";
    if (
    strlen($str)<=254)
    {
    echo 
    $str "\r\n";
    preg_match_all('/\+([0-9])/s'$str$result);
    $count count($result[0]);
    echo 
    "Кол-во найденных плюсов, за которыми идет цифра = " $count "\r\n";
    for (
    $i=0;$i<$count;$i++)
    {
    $t explode('+',$result[0][$i]);
    $str str_replace($result[0][$i],$t[1],$str);
    }
    echo 
    $str "\r\n";
    }
    else echo 
    'Длина строки больше 254 символа. Незачот';
    ?>
    Не судите строго, по образованию не программер:) Но вроде работает
     
    #6 Pashkela, 9 Dec 2008
    Last edited: 9 Dec 2008
  7. Gifts

    Gifts Green member

    Joined:
    25 Apr 2008
    Messages:
    2,494
    Likes Received:
    807
    Reputations:
    614
    Pashkela Если уж пользоваться регулярками, то
    ОТВЕТ №1
    PHP:
    $str "+1+djfgdhfg+w4534+523+sdkh+901Q";
    if (
    strlen($str)<=254)
    {
    echo 
    $str "\r\n";
    echo 
    "Кол-во найденных плюсов, за которыми идет цифра = " preg_match_all('/\+([0-9])/s'$str$tmp) . "\r\n";
    echo 
    preg_replace('#\+(\d)#','\\1',$str) . "\r\n";
    }
    else echo 
    'Длина строки больше 254 символа. Незачот';
     
    _________________________
  8. Doom123

    Doom123 Elder - Старейшина

    Joined:
    11 Nov 2006
    Messages:
    749
    Likes Received:
    244
    Reputations:
    22
    :D

    PHP:

    <?php
    $str 
    "+1+djfgdhfg+w4534+523+sdkh+901Q";

    if(
    strlen($str)>254) exit('Ошибочка');

    $a  explode('+',$str);
    $b '';
    $i 0;
    $j 1;

    while(isset(
    $a[$j]))
    {
        if(
    is_numeric(substr($a[$j],0,1))) 
        {    
            
    $b .= $a[$j];
            
    $i++;
        }
        else 
    $b .= '+'.$a[$j];
        
    $j++;
    }

    echo 
    'Кол-Во:'.$i.' <br />Строка:'$b;
    ?>
     
    1 person likes this.
  9. InfernoNet

    InfernoNet Elder - Старейшина

    Joined:
    7 Nov 2007
    Messages:
    248
    Likes Received:
    228
    Reputations:
    -20
    Нужны конкретные ссылки на тему "Общие принципы использования избыточности при кодировании для канала" или просто "Кодирование канала".
     
  10. Roston

    Roston Elder - Старейшина

    Joined:
    31 Jul 2008
    Messages:
    337
    Likes Received:
    104
    Reputations:
    8
    Нарисуйте плиз алгоритим (в виде блок-схемы) алгоритм нахождения сумы и умножения всех n(количество) елементов масива. Заранее благодарен! я рисовал но до меня до*обуются что не так.. хоче что бы кто то нарисовал кто реально шурупает! наперед спасибо!
     
  11. Nenorma

    Nenorma New Member

    Joined:
    3 Mar 2009
    Messages:
    6
    Likes Received:
    0
    Reputations:
    0
    а ктонить умеет программировать на турбо прологе? Может у кого-нить есть исходник готовой программы?
     
  12. Fepsis

    Fepsis Elder - Старейшина

    Joined:
    17 Sep 2008
    Messages:
    791
    Likes Received:
    391
    Reputations:
    72
    Помню в универе эту фигню проходили.. Решали задачки на родственные связи.. Что конкретно тебе надо..??!
     
  13. NigHT_0WL

    NigHT_0WL Member

    Joined:
    28 Jan 2009
    Messages:
    32
    Likes Received:
    7
    Reputations:
    0
    посмотри тут:
    http://www.chipinfo.ru/literature/radio/199909/p70_72.html
    http://www.pbxlib.com.ua/mobile/article_39.html
    http://www.dvo.sut.ru/libr/rvies/w151kazn/5.htm
    http://www.roks.com.ua/ru/info/our/03
    http://fmi.asf.ru/Library/Book/Network/2_2.html
    http://www.radioland.net.ua/contentid-311-page3.html
     
  14. NigHT_0WL

    NigHT_0WL Member

    Joined:
    28 Jan 2009
    Messages:
    32
    Likes Received:
    7
    Reputations:
    0
    Cмотри кажется так http://rapidshare.com/files/204957904/__1041___1083___1086___1082_.bmp.html
     
  15. Gray_Wolf

    Gray_Wolf Active Member

    Joined:
    7 Mar 2009
    Messages:
    377
    Likes Received:
    135
    Reputations:
    10
    С адским опозданием, но вдруг кому-нибудь пригодится.(хотя сильно сомневаюсь)
    БС суммирования
    [​IMG]

    Так-же некоторые особо злое**чие преподы(которым далеко за 70) требуют использовать вместо этой конструкции:
    [​IMG]
    вот эту:
    [​IMG]

    Ну и вывод некоторые требуют вот такой:
    [​IMG]
     
  16. Roston

    Roston Elder - Старейшина

    Joined:
    31 Jul 2008
    Messages:
    337
    Likes Received:
    104
    Reputations:
    8
    спасибо... чёт я давно в тему эту не заходил... сдал я екзамен уже... преподу не было к чему придерется.. с 14 бало 14 за схему... пасип всем кто помогал
     
  17. banned

    banned Banned

    Joined:
    20 Nov 2006
    Messages:
    3,324
    Likes Received:
    1,193
    Reputations:
    252
    Сессию закрыл, гз меня)