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

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

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

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

    Joined:
    6 Jun 2007
    Messages:
    369
    Likes Received:
    92
    Reputations:
    5
    Code:
    void replace(int* mas, int size)
    {
    	int max = mas[0]; // максимальный элемент массива
    	int max_n = 0; // позиция максимального элемента в массиве
    	// находим позицию максимального элемента
    	for(int i=0; i<sizel i++)
    	{
    		if(mas[i] > max)
    		{
    			// виксируем только мервые максимальный элемент, остльные проверку не проходят
    			max = mas[i];
    			max_n = i;
    		}
    	}
    	for(; max_n < size; max_n++)
    	{
    		mas[max_n] += 0.5;
    	}
    }
    
    1. с такими вопросами обращаться в раздел для студентов
    2. постыдился бы. Взял бы книжку да почитал бы.
     
  2. Fan-pro

    Fan-pro New Member

    Joined:
    5 Apr 2011
    Messages:
    2
    Likes Received:
    0
    Reputations:
    -2
    Задачи. С++ помогите решить

    1) Правые треугольные матрицы А и В порядка N заданы в виде последовательностей (N+1)N/2 чисел : сначала идет N элементов первой строки, затем N-1 элементов второй строки , начиная со второго, и т.д. (в последней N-ой строке только N-й элемент. Найти матрицу А(Е+В2), где Е – единичная матрица порядка N.
    2) Даны действительные числа Ai, количество которых равно N2. Получить квадратную матрицу порядка N, элементами которой являются числа Ai, распо-ложенные по схеме, представленной на следующем рисунке:

    3) Составить программу, переводящую десятичные числа в шестнадцатиричные и обратно.
    4) Дан многочлен Р(х) степени N. Даны действительные числа А и В. Получить многочлен АхР2(х)+В.
    5) Реакция организма на лекарство через N часов после инъекции выражается показателем RN, равным RN=ARN-1+0.4N, где R0=1, а А –положительное число, характеризующее данный препарат. Определить, через сколько часов наступит максимальная реакция на организм. После скольких часов реакция организма понизится ниже 50% начального уровня.
    6) Заяц бежит вдоль заданной прямой с некоторой скоростью. Собака, находившаяся вначале на расстоянии L от зайца, бежит все время в направлении зайца со своей скоростью, большей заяьчей. Найти время, когда собака настигнет зайца. Построить «кривую погони».
     
  3. Fan-pro

    Fan-pro New Member

    Joined:
    5 Apr 2011
    Messages:
    2
    Likes Received:
    0
    Reputations:
    -2
    Помогите плиз решить
    1) Правые треугольные матрицы А и В порядка N заданы в виде последовательностей (N+1)N/2 чисел : сначала идет N элементов первой строки, затем N-1 элементов второй строки , начиная со второго, и т.д. (в последней N-ой строке только N-й элемент. Найти матрицу А(Е+В2), где Е – единичная матрица порядка N.
    2) Даны действительные числа Ai, количество которых равно N2. Получить квадратную матрицу порядка N, элементами которой являются числа Ai, распо-ложенные по схеме, представленной на следующем рисунке:

    3) Составить программу, переводящую десятичные числа в шестнадцатиричные и обратно.
    4) Дан многочлен Р(х) степени N. Даны действительные числа А и В. Получить многочлен АхР2(х)+В.
    5) Реакция организма на лекарство через N часов после инъекции выражается показателем RN, равным RN=ARN-1+0.4N, где R0=1, а А –положительное число, характеризующее данный препарат. Определить, через сколько часов наступит максимальная реакция на организм. После скольких часов реакция организма понизится ниже 50% начального уровня.
    6) Заяц бежит вдоль заданной прямой с некоторой скоростью. Собака, находившаяся вначале на расстоянии L от зайца, бежит все время в направлении зайца со своей скоростью, большей заяьчей. Найти время, когда собака настигнет зайца. Построить «кривую погони».
     
  4. just_seo

    just_seo New Member

    Joined:
    28 Feb 2011
    Messages:
    5
    Likes Received:
    0
    Reputations:
    -1
    Помогите. Задача по паскалю.

    Здравствуйте, нужно развязать небольшую задачу по паскалю. Вот задача:
    То есть, первым делом пользователь должен ввести количество цифр, которые нужно будет ввесть (условие, что N<1000). Дальше пользователь должен ввести сами цифры (N цифр). Например:
    То есть, берутся трех цифровые числа и суммируются.

    Если можно, загрузите на ФО паскаль-файл, с самим кодом. Если нет такой возможности, просто напишите мне исходник.
    Заранее благодарю за помощь. Нужно сделать в течении часа.
     
  5. patcher

    patcher Banned

    Joined:
    15 Dec 2009
    Messages:
    190
    Likes Received:
    37
    Reputations:
    10
    Code:
    var n,i,k,s:integer;
    begin
    s:=0;
    writeln('Vvedite n:');
    readln(n);
    writeln('Vvedite ', n, ' chisel:');
    for i:=1 to n do
    begin
      readln(k);
      if (k>99) and (k<1000) then inc(s,k);
    end;
    writeln('Rezultat:');
    writeln(s);
    readln;
    end.
    
    -------------------------
    add
    для s лучше поменять тип на более емкий
     
    #3365 patcher, 6 Apr 2011
    Last edited: 6 Apr 2011
  6. MaTpOc

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

    Joined:
    5 May 2008
    Messages:
    633
    Likes Received:
    475
    Reputations:
    25
    Помогите плиз решить задачу.
    Дан двумерный массив, нужно в нем поменять третью букву в пятой и седьмой строке местами. яп Си
     
  7. tim-oleksii

    tim-oleksii Member

    Joined:
    14 Mar 2011
    Messages:
    199
    Likes Received:
    10
    Reputations:
    0
    char **s;
    // выделение памяти и инициализация s

    char k = s[4][2];
    s[4][2] = s[6][2];
    s[6][2] = k;
     
  8. MaTpOc

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

    Joined:
    5 May 2008
    Messages:
    633
    Likes Received:
    475
    Reputations:
    25
    ниче не понял...

    почему 4 на 2
    потом 4 на 2 =6 на 2...?!
     
  9. tim-oleksii

    tim-oleksii Member

    Joined:
    14 Mar 2011
    Messages:
    199
    Likes Received:
    10
    Reputations:
    0
    Индексация идет с нуля. Соответственно 4 индекс - пятая строка.
     
  10. B1ade

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

    Joined:
    25 Apr 2008
    Messages:
    40
    Likes Received:
    20
    Reputations:
    16
    Code:
    procedure TForm1.Button1Click(Sender: TObject);
    var
       mass:array[-100..400] of integer;
       i:integer;
       s:string;
    begin
     randomize; //gen
     for i:= 1 to 24 do
      begin
      mass[i]:=-61+random(211);
      end;
      Memo1.Lines.Add('Введеный массив');
      for i:=1 to 24 do
       s:=s+floattostr(mass[i])+' ';
      Memo1.Lines.Add(s);
    end;
    
    Есть массив, надо отсортировать его по нажатию баттона линейным методом, по возврастанию..
    Буду благодарен за помощь.
     
  11. JoeBlanc

    JoeBlanc New Member

    Joined:
    29 Oct 2010
    Messages:
    14
    Likes Received:
    0
    Reputations:
    0
    Здравствуйте.Прошу помощи, кому не лень напишите пожалуйста на языке Си вот такую задачу:
    Создать программу, которая из списков слов L1, L2 формирует новый список L, занося в него по одному разу те слова, содержащиеся хотя бы в одном из списков L1 и L2.
    Благодарю
     
  12. MarKLar

    MarKLar New Member

    Joined:
    11 Mar 2008
    Messages:
    27
    Likes Received:
    1
    Reputations:
    0
    Помогите решить задачу на C++

    Помогите решить на С++

    В двухмерном целочисленном массиве (размеры массива N, M и значения его элементов вводить с клавиатуры) найти указанное значение.
    Массив в памяти разместить динамически (с использованием операций new и delete), ввод исходных данных и вывод полученных результатов выполнить в основной функции, а решение задачи оформить в виде отдельной функции пользователя.
    Не использовать глобальных переменных. Найти число элементов массива = T и перемножить эти элементы. Значение Т вводится с клавиатуры.
     
  13. criptic

    criptic Member

    Joined:
    24 Mar 2009
    Messages:
    51
    Likes Received:
    5
    Reputations:
    0
    Тема такая : Заполнение винчестера файлами с учетом фрагментации

    Нужно реализовать это как-то на любом языке.

    Как Диск заполняется данными я представляю. Что такое фрагментация, в целом, тоже.

    __
    По идее , мне нужно сделать модель того как заполняется диск , как в него заливаются файлы с учетом того что они заполняются фрагментированными
    Или по другому.
    Описать процесс именно того, как фрагментируются файлы и записываются на диск

    Нужно разобраться, как это вообще можно сделать и на чем реализовывать. ?

    Буду признателен за помощь.
     
  14. DooD

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

    Joined:
    30 Sep 2010
    Messages:
    1,168
    Likes Received:
    450
    Reputations:
    288
    1) Моделирование работы концентратора. Нужно сделать, чтобы 4 компьютера были в виде ячеек, а концентратор должен определять адрес от кого передается и кому и читать сам пакет, которые передается, к примеру слово "привет"
    2) Моделирование работы сетевого протокола. Разработать две проги, одна посылает, другая принимает пакет. В качестве пакета использовать файл содержащий слово "привет"

    надо на с++. цену укажите в личку.
     
  15. melоman

    melоman New Member

    Joined:
    14 Jan 2010
    Messages:
    10
    Likes Received:
    3
    Reputations:
    1
    Создание производных классов и освоение операторов управления доступом к компонентам класса.
    Данные для задачи
    (Т1)SymbString
    (Т2)DecString
    (Операции (методы))operator +(T&, T&)

    Нужно написать на с++ желательно на 2008 студии. Цену в личку
     
  16. Чакэ

    Чакэ Elder - Старейшина

    Joined:
    15 Aug 2010
    Messages:
    260
    Likes Received:
    66
    Reputations:
    62
    помогите реализовать следующее: отображать процесс извлечения данных из файла на progressbar. содержимое файла не известно, может быть как текст так и бинарник. туплю со вчерашнего дня. c sharp.
     
  17. FROGRUS

    FROGRUS New Member

    Joined:
    12 Nov 2010
    Messages:
    5
    Likes Received:
    0
    Reputations:
    0
    помогите записать результат функции int t() в текстовый файл
    #include "stdafx.h"
    #include <iostream>
    #include <cstring>
    #include <cstdio>
    using namespace System;
    using namespace std;
    struct Car
    {
    char model[15];
    char seriya[15];
    int year;
    int price;\
    char avariya[15];
    };
    void Oseriya( const Car &);
    int t();
    int main()
    {
    FILE *file;
    if ((file = fopen("3.txt","wt")) == NULL)
    printf("Файл невозможно открыть или создать\n");
    else{
    {
    fprintf (t());
    }
    }
    fclose(file);
    cout<<'\n'<<t();
    return 0;
    }
    int t()

    {
    setlocale(LC_ALL,"Russian");
    int n;
    Car*masCar;
    cout<<"Сколько машин?-->";
    cin>>n;
    masCar=new Car[n];
    for(int a=0;a<n;a++)
    {
    cout<<"Марка-->";
    cin>>masCar[a].model;
    cout<<"Модель-->";
    cin>>masCar[a].seriya;
    cout<<"Год выпуска-->";
    cin>>masCar[a].year;
    cout<<"Цена-->";
    cin>>masCar[a].price;
    cout<<"Состояние аварийности-->";
    cin>>masCar[a].avariya;
    }
    char name[15];
    cout<<"Имя водителя-->";
    cin>>name;
    for (int a=0;a<n;a++)
    {
    Oseriya(masCar[a]);
    }
    cout<<"\nВодитель"<<name<<'\n';
    delete[]masCar;
    system("PAUSE");
    return t();
    }
    void Oseriya(const Car & b)
    {
    cout<<"\n_________________________________________________________________\n";
    cout<<"\nМарка-"<<b.model;
    cout<<"\nМодель-"<<b.seriya;
    cout<<"\nГод выпуска-"<<b.year;
    cout<<"\nСостояние аварийности-"<<b.avariya;
    cout<<"\nЦена-"<<b.price;
    }
     
  18. WDS

    WDS New Member

    Joined:
    5 Aug 2010
    Messages:
    1
    Likes Received:
    2
    Reputations:
    0
    Помогите пожалуйста решить на Pascal:

    1)
    [​IMG]

    2)
    2.2 Дан одномерный массив целых чисел. найти сумму всех четных элементов массива, стоящих на четных местах (имеющих четные номера). Массив задается с помощью генератора случайных чисел.

    3)
    3.2 Задана квадратная матрица А размером NxN (N<=10), состоящая из действительных элементов. Найти среднее арифметическое элементов каждой из нечетных строк этой матрицы.

    4)
    4.2 Пользователю, зарегистрированному на FTP-сервере, для получения доступа к файлам на нем нужно набрать в FTP- браузере команду вида: ftp://логин:пароль@адрес_сервера. Написать программу, которая из введенной строки выделяет логин, пароль и адрес FTP-сервера и выводит эту информацию на экран.
    Пример: Входная строка:
    Code:
    ftp://CoolUser:[email protected]
    Вывод:
    Адрес сервера: ftp.erunda.ru
    Логин: CoolUser
    Пароль: parol

    5)Скрытый текст требуется (1 сообщение(ий), сейчас у вас 2):

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


    Заранее большое спасибо :) Сессия на носу надо поскорей сделать..
     
    #3378 WDS, 20 Apr 2011
    Last edited: 20 Apr 2011
    1 person likes this.
  19. M1ks

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

    Joined:
    23 Aug 2007
    Messages:
    140
    Likes Received:
    9
    Reputations:
    0
    Помогите с программкой.
    Нужно написать на паскале:

    Найти сумму отрицательных элементов, находящихся на побочной диагонали квадратичной матрицы
     
    1 person likes this.
  20. return

    return New Member

    Joined:
    23 Oct 2010
    Messages:
    125
    Likes Received:
    3
    Reputations:
    1
    WDS
    4 года как не пользовался паскалем, может что и забыл, но задачи лёгкие то решил помочь:
    1)
    Code:
    program one;
    var
       n,i: integer;
       rez: real;
    begin
    writeln('Input n: ');
    readln(n);
    if n>=10 then n:=10;
    for i:=1 to n do
        rez:=2*i/2*i+1;
    writeln('Output rez: ');
    write(rez);
    readln;
    end.
    2)
    Code:
    program two;
    var
       mass: array[1..10] of integer;
       sum,i,buf: integer;
    begin
    randomize;
    for i:=1 to 10 do
    begin
        mass[i]:=random(100);
        write(mass[i]);
        write(' ');
    end;
    sum:=0;
    for i:=1 to 10 do
    begin
         buf:=i mod 2;
         if buf<>0 then continue;
         buf:=mass[i] mod 2;
         if buf<>0 then continue;
         sum:=sum+mass[i];
    end;
    writeln('sum=');
    write(sum);
    readln;
    end.
    3)
    Code:
    program three;
    var
       matr: array[1..5, 1..5] of real;
       sr,sum: real;
       i,j,buf: integer;
    begin
    randomize;
    for i:=1 to 5 do
    begin
        for j:=1 to 5 do
        begin
             matr[i,j]:=random(20);
             write(matr[i,j]);
             write(' ');
        end;
        writeln;
    end;
    for i:=1 to 5 do
    begin
         buf:=i mod 2;
         if buf=0 then continue;
         sum:=0;
         for j:=1 to 5 do
             sum:=sum+matr[i,j];
         sr:=sum/5;
         writeln('Average: ');
         write(sr);
         writeln;
    end;
    readln;
    end.
    4) коряво, но должно работать
    Code:
    program four;
    var
    	str,strbuf,sbuf: string;
    	i,j,buf: integer;
    begin
    write('Input str: ');
    readln(str);
    buf:=pos('@',str);
    strbuf:=copy(str,buf+1,length(str));
    writeln('Adres: ');
    write(strbuf);
    writeln;
    i:=pos('//',str);
    strbuf:=copy(str,i+2,length(str));
    j:=pos(':',strbuf);
    sbuf:=copy(strbuf,1,j-1);
    writeln('Login: ');
    write(sbuf);
    writeln;
    i:=pos('@',strbuf);
    sbuf:=copy(strbuf,j+1,i-j-1);
    writeln('Password: ');
    write(sbuf);
    readln;
    end.
    
     
    #3380 return, 25 Apr 2011
    Last edited: 25 Apr 2011
Thread Status:
Not open for further replies.