Студентам с лабораторными сюда (архивная - 2015)

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by _Great_, 20 Jun 2007.

Thread Status:
Not open for further replies.
  1. moodoone

    moodoone Member

    Joined:
    21 Oct 2009
    Messages:
    144
    Likes Received:
    38
    Reputations:
    5
    2 задача
    PHP:
    program Project5;

    var 
    x,y,z,t,r,q:real;

    i,j,min:integer;
    a:array[1..5of real;
    begin
    writeln 
    ('Vvedite 5 4isel');
    readln(x,y,z,t,r);
    a[1]:=abs(x);
    a[2]:=abs(y);
    a[3]:=abs(z);
    a[4]:=abs(t);
    a[5]:=abs(r);
    for 
    := 1 to 4 do
    begin
      min
    :=i;
      for 
    j:=i+1 to 5 do
      if 
    a[min]>a[jthen
      begin
      q
    :=a[min];
        
    a[min]:=a[j];
        
    a[j]:=q;
      
    end;
    end;
    writeln('Min. 4islo- 'a[1]);

    end.
     
    2 people like this.
  2. AIRZI

    AIRZI Banned

    Joined:
    11 Mar 2009
    Messages:
    1
    Likes Received:
    2
    Reputations:
    4
    up-up
     
  3. Selby

    Selby New Member

    Joined:
    29 Sep 2010
    Messages:
    1
    Likes Received:
    0
    Reputations:
    0
    Delphi 7

    Вычислить заданное смешанное арифметическое выражение для данных в форматах REAL (переменные a,b) и целые числа (переменные c,d).

    Исходные данные должны вводиться с проверкой на область допустимых значений.
    Пример

    Code:
    program lab1;
    var
    d,a,c,x: real;
    {$APPTYPE CONSOLE}
    
    begin
     writeln('Vvedite a,c,d');
     readln (a,c,d);
      if (a=-4) then
       writeln('Znamenatel obraschaetsya v nol')
      else
       begin
        x:=(ln(2*c)+d-52)/(a/4+1);
        writeln('x=',x:0:3);
       end;
      readln;
     end.
    Когда ввожу значение С, равное нулю, то вылетает.

    Например
    5
    0
    7
    Что я пропустил?
     
  4. revenantus

    revenantus New Member

    Joined:
    27 Sep 2010
    Messages:
    9
    Likes Received:
    0
    Reputations:
    0
    помогите пожалуйста с этим.никак не вкурю в какю систему перевести
     
  5. resulteeer

    resulteeer Banned

    Joined:
    10 Aug 2010
    Messages:
    5
    Likes Received:
    0
    Reputations:
    0
    Первая

    Code:
    program Project1;  
    {$APPTYPE CONSOLE} 
     uses    SysUtils;   
     var    x,y:real;  
    begin 
      write('Input x : ');
      readln(x);  
        if (x<-4) then y:=1; 
        if (x>=-4) and (x<=4) then y:=x/4; 
        if (x>4) then y:=-1;       
          writeln('y'+'[x] = ', y:6:2); 
          readln;   
     end.  
     
  6. zifanchuck

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

    Joined:
    27 Oct 2008
    Messages:
    396
    Likes Received:
    154
    Reputations:
    3
    Найти сумму всех n-значных чисел (1<=n<=4)

    Никак не вкурю что нужно сделать. Типа в цикле посчитать
    1+2+3+4 ? Меня просто "n-значных" как-то смущает=(
     
  7. kosmo987

    kosmo987 Member

    Joined:
    28 Apr 2010
    Messages:
    0
    Likes Received:
    6
    Reputations:
    1
    это значит,что задается число n от 1 до 4,которое означает размерность искомых чисел.то есть,если n=2,то нужно посчитать сумму 10+11+12+...+98+99,если n=3,соответственно найти сумму 100+101+102...+998+999
     
    1 person likes this.
  8. zifanchuck

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

    Joined:
    27 Oct 2008
    Messages:
    396
    Likes Received:
    154
    Reputations:
    3
    О=) пасиба)))
     
  9. A1exx

    A1exx New Member

    Joined:
    8 Feb 2009
    Messages:
    24
    Likes Received:
    4
    Reputations:
    0
    Требуется составить программу для подсчета суммы двух 64 битных чисел. Числа вводятся с клавиатуры и результат отображается на экране. Предусмотреть неправильный ввод данных (сообщение об ошибке и завершение программы), а так же переполнение, когда сумма не помещается в 64 битное представление числа, необходимо выводить на экран всю информацию об этапах выполнения программы.

    Примеры:
    Введите число #1: 4235x
    >>> ошибка неправильный ввод данных
    >>> завершение программы
    ----------------------------
    Введите число #1: 4234
    Введите число #2: 4564
    >>> введены числа размером менее чем 32 бита (оптимизация)
    >>> результат 8798
    ----------------------------
    И т.д.
    Я знаю,что всю прогу влом кому-нибудь делать,даже если она лёгкая,но не могли бы хотя бы подогнать строки с проверкой на Ascii элементов строки и процедуру перевода етих долбанных наборов 12345 цифр в нормальное число!!!!!
    Заранее,Спасибо!
    Язык Assembler
     
  10. knit

    knit New Member

    Joined:
    12 Mar 2010
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    Всем привет!

    Помогите написать программку
    Найти произведение цифр заданного целого четырёхзначного числа и определить, какому символу оно соответствует.

    Помогите пожалуйста буду очень благодарен.
    Стучите в асю 375-374-118 помогу материально)


    язык турбо паскаль
     
    #2910 knit, 10 Oct 2010
    Last edited: 10 Oct 2010
  11. criptic

    criptic Member

    Joined:
    24 Mar 2009
    Messages:
    51
    Likes Received:
    5
    Reputations:
    0
    Нужна помощь.
    лаба уже написана в Exel.
    Там идут проверки на Вилкоксона, и всякая чушь .

    Суть - нужно перебить все под мой вариант, все данные есть.
    Сгрупировать страницы, чтобы правильно выводились при печати.

    Дело - чушь, но суетное. Особенно, когда не любишь до глубины души Exel и времени на это нет.

    Нужно все сделать до 2 : 00 мо москве.

    Даю 200р.
    Кто заинтересован, пишите в тему или ЛС
     
    #2911 criptic, 12 Oct 2010
    Last edited: 13 Oct 2010
  12. Давид

    Давид New Member

    Joined:
    11 Oct 2010
    Messages:
    3
    Likes Received:
    0
    Reputations:
    0
    1. Дано целое n. Чему равно произведение его цифр? (Программирование циклических процессов)
    2. Даны действительные числа a, b, c и x, y. Выяснить, пройдет ли кирпич с ребрами a,b,c в прямоугольное отверстие со сторонами x и y. (Программирование ветвящихся процессов)

    Напишите пожалуйста данные программы на C# аттестационная неделя скоро
     
  13. ViLKaa

    ViLKaa Member

    Joined:
    24 Jul 2009
    Messages:
    41
    Likes Received:
    7
    Reputations:
    5
    ну если очень по тупому..

    int n=3246587235; //типа число
    string s_n=n.ToString();
    int result=1;
    for(int i=0;i<s_n.Length;i++)
    result*=Convert.ToInt32(s_n);
     
  14. Давид

    Давид New Member

    Joined:
    11 Oct 2010
    Messages:
    3
    Likes Received:
    0
    Reputations:
    0
    По тупому не надо, в скобках указан метод решения)))
     
  15. White_Tiger.

    White_Tiger. New Member

    Joined:
    10 Oct 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    Помогите, пожалуйста, с двумя задачами:

    [​IMG]

    Как реализовать их на Pascal?
     
    #2915 White_Tiger., 15 Oct 2010
    Last edited: 15 Oct 2010
  16. CD-ROM

    CD-ROM Banned

    Joined:
    3 Jun 2010
    Messages:
    2
    Likes Received:
    0
    Reputations:
    0
    Помогите с решением задач на дельфи или паскале.
    Задача A-Промилле
    Промилле

    Лимит времени: 1 с
    Лимит памяти: 64 Мбт

    Дима увлекся точными расчетами. Он хорошо изучил проценты (1 / 100 часть) и был поражен новой информацией: 1 / 1000 часть чего-либо называется промилле и обозначается ‰. Именно такая точность ему была нужна для расчетов.
    Задачи. В файле promile.in в нескольких строках через пробелы записано промилле. Необходимо добавить все части и определить целую и дробную части. Результат записать через запятую в файл promile.out.

    Задача B-Драгстер
    Драгстер

    Лимит времени: 1 с
    Лимит памяти: 64 Мбт

    Драгстерах называют сверхмощные гоночные машины, которые соревнуются на дистанции 402 м. Драгстер всю дистанцию движутся с ускорением (будем считать его постоянным) и пересекают финишную прямую со скоростями 250-500 км / ч.
    В первой строке файла dragster.in записано число N - количество драгстер, в следующих N строках через пробел названия драгстер и показатели их ускорения.
    Вычислите скорость в км / час каждого драгстер с точностью до третьего знака после запятой и выведите название самого быстрого. Результаты выведите в отдельных строках файла dragster.out. Гарантируется, что победитель будет единственный.

    Задача C-Eight 2 Sixteen
    Eight 2 Sixteen

    Лимит времени: 1 с
    Лимит памяти: 64 Мбт

    В файле eight.dat записано дробное число в системе счисления 8. Файл может содержать до 10 ^ 6 знаков.
    В sixteen.sol выведите это же число в системе счисления 16.

    Заранее спс.
     
  17. Nikita_M

    Nikita_M New Member

    Joined:
    18 May 2010
    Messages:
    1
    Likes Received:
    0
    Reputations:
    0
    Анаграммы

    C++
    Задается некоторое слово(например,GOOD). Из всех его букв состовляются различные другие слова, возможно, бессмысленные. (например,GODO,OOGD и т.д.).
    Требуется составить программу, которая строит следующее за заданным слово по алфавиту слово из полученного набора.

    Входные данные. В единственной строке текстового файла input.txt заданное слово, содержащее не более 30 символов (латинских прописных)
    Данные на выходе. В файл output.txt требуется записать слово из тех же букв, полученное описанным по условии способом. Если такого слова не существует, вывести слово "IMPOSSIBLE"

    Пример.
    Input.txt Output.txt

    BDA BAD
    TEA IMPOSSIBLE
    GOOD ODGO
     
  18. LaBaN

    LaBaN New Member

    Joined:
    16 Oct 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    Матриця

    потрібно написати функцію на С яка повертає **pmat , вона повина створити динамічно матрицю , в якій елементи з непарними індексами рядків і стовпців мають бути проініціалізовані 0 , але 0 не мають входити в динамічно виділену память, але в кінцеві матриці повині бути ..... пліз допоможіть ........
     
  19. Catbert

    Catbert Banned

    Joined:
    29 Jun 2010
    Messages:
    80
    Likes Received:
    27
    Reputations:
    10
    Нащяльника, мая твая не панимай!
     
  20. LaBaN

    LaBaN New Member

    Joined:
    16 Oct 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    matr

    нада написать функцию, яка создаэ матрицу MxN(мы задайом в функц.) и отдайот указатель **pmat, матрица должна быть создана дынамическе , елементи з нечотнимы индексамы рядков ы столбцов должны бить 0 , але на них не маэт выдилятса дынамычыская память .
    sorry I'm not russian I'm Ukrainian) :cool:
     
Thread Status:
Not open for further replies.