Помощь с лабами Опции

[Mind]

Помогите с лабой "Строки":
Дана строка слов, разделенных пробелами. Определите количество слов, которые встречаются более одного раза. Сформируйте строку из неповторяющихся слов.

[Holsten]

Помогите с лабой "Строки":
Дана строка слов, разделенных пробелами. Определите количество слов, которые встречаются более одного раза. Сформируйте строку из неповторяющихся слов.

На VB или VBA примерно так:

Код

stroka = "a bb v v" 'Исходная строка
MassivSlov = Split(stroka, Chr(32)) 'Преобразование строки в массив
For i = 0 To UBound(MassivSlov) - 1 'Цикл перебора массива
    If Not InStr(Chr(32) & MassivSlov(i) & Chr(32), strokaFinal) Then 'Проверка наличия слова в новой строке
     strokaFinal = strokaFinal & Chr(32) & MassivSlov(i) & Chr(32) 'Добавление слова, с пробелами в начале и конце слова, в новую строку
    End If
Next i
strokaFinal = Join(Split(Trim(strokaFinal), Chr(32) & Chr(32)), Chr(32)) 'удаление лишних пробелов и задание разделителя слов

Сообщение отредактировано Holsten - 21.04.2008 - 17:09

[Mind]

Спасибо за VB, но мне надо на C++

[SVIT]

Извиняюсь заранее, но сколько будет стоить зделать эти задачки на паскале?

Связаться со мной можно по форуму либо IcQ (В профиле)

Сообщение отредактировано SVIT - 30.04.2008 - 22:44

Прикрепленные файлы

 Pascal.txt ( 937 байт ) Кол-во скачиваний: 38

 

[SVIT]

Извиняюсь заранее, но сколько будет стоить зделать эти задачки на паскале?

Связаться со мной можно по форуму либо IcQ (В профиле)

Всё еще актуально. Помогите плиз (:

[ultimatum]

Требуеться программа на java "Модель идеального газа" суть в том что есть квадрат и идеальный газ,тоесть удары все абсолютно упругие и сила притяжения отсутствует....Пользователь может задать количество частиц и диапазон скорости....Скорость будет выбираться рандомно из диапазона....Требуеться коментарии по классам,а также где лежит вся графика тоже обьяснить
нужно СРОЧНО к четвергу...Денбшка хорошая из-за срочности....Пишите в icq 302-967-811

[Tesh]

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

» Показать/скрыть спойлер... «

Код

/*Задать  значения вещественным элементам  матриц
B = {bij} и D = {dij},
где i = 0, 1, 2,...,7; j = 0, 1, 2, 3,
и  сформировать массивы Y и Z, состоящие
соответственно из элементов матриц B и D,
меньших заданного числа R*/

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

int main()
{
// Кучка переменных (k,s - порядковые номера элементов массивов Y,Z; x,u - счётчки, считают число элементов в массиве Y,Z):
int i=0, j=0, k=0, s=0, x, u;
float r, b[7][3], d[7][3], y[21], z[21];

srand( (unsigned)time( NULL ) );
// Заполнение матрицы B и D вещественными числами:

printf("Matrix B:\n");
for(i=0;i<4;i++)
{ for(j=0;j<8;j++) {
   b[i][j]=rand()%100/10.0;
   printf("%.1f\t", b[i][j]); }
  printf("\n");
}
printf("Matrix D:\n");
for(i=0;i<4;i++)
{ for(j=0;j<8;j++) {
   d[i][j]=((rand()%100))/10.0;
   printf("%.1f\t", d[i][j]); }
  printf("\n");
}
// Проверяем матрицы B и D на элементы меньше заданного числа R, если находим - записываем их в матрицы Y,Z соответственно)
  printf("Please, enter number R (in float format):");
   scanf("%f",&r);
k=0;
  for(i=0;i<4;i++)
  { for(j=0;j<8;j++)
   {
    if(b[i][j]<=r)
     {if(k!=0) k=k+1; y[k]=b[i][j]; if(k==0) k++; }
   }
  }
s=0;
  for(i=0;i<4;i++)
  { for(j=0;j<8;j++)
   {
    if(r>d[i][j])
     { if(s!=0) s=s+1; z[s]=d[i][j]; if(s==0) s++; }
   }
  }
x=k; // Число элементов нового массива пишем в переменные x и u из счётчиков
u=s;
// Выводим матрицы Y,Z с проверкой условия, что матрицы не пустые
printf("\nElements of matrix B less than %.1f:\n", r);
  if(x!=0)
   {
    for(k=0;k<x;k++)
     { printf(" %.1f", y[k]); }
    printf("\n");
   }
  else
   { printf("There are no elements less than %f in matrix B\n", r);}

  printf("Elements of matrix D less than %.1f:\nThe First is:%.1f\tThe Second is:%.1f\t", r,z[0],z[1]);
  if(u!=0)
   {
    for(s=0;s<u;s++)
     { printf(" %.1f", z[s]); }
    printf("\n");
   }
  else { printf("There are no elements less than %f in matrix D\n", r);}
return 0;
}

Сообщение отредактировано Tesh - 21.05.2008 - 19:15

[Vala4i]

Код

/*Задать  значения вещественным элементам  матриц
B = {bij} и D = {dij},
где i = 0, 1, 2,...,7; j = 0, 1, 2, 3,
и  сформировать массивы Y и Z, состоящие
соответственно из элементов матриц B и D,
меньших заданного числа R*/

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

void main()
{
// Кучка переменных (k,s - порядковые номера элементов массивов Y,Z; x,u - счётчки, считают число элементов в массиве Y,Z):
int i=0, j=0, k=0, s=0;
float r, b[7][3], d[7][3], y[21], z[21];

srand( (unsigned)time( NULL ) );
// Заполнение матрицы B и D вещественными числами:

printf("Matrix B:\n");
for(i=0;i<7;i++)
{
    for(j=0;j<3;j++)
    {
        b[i][j]=rand()%100/10.0;
        printf("%.1f\t", b[i][j]);
    }
    printf("\n");
}

printf("\nMatrix D:\n");

for(i=0;i<7;i++)
{
    for(j=0;j<3;j++)
    {
        d[i][j]=((rand()%100))/10.0;
        printf("%.1f\t", d[i][j]);
    }
    printf("\n");
}
// Проверяем матрицы B и D на элементы меньше заданного числа R, если находим - записываем их в матрицы Y,Z соответственно)

printf("\nPlease, enter number R (in float format): ");
scanf("%f",&r);

k=0;
for(i=0; i<7; i++)
{
    for(j=0; j<3; j++)
    {
        if(b[i][j]<r)
        {
            y[k]=0;
            y[k]=b[i][j];
            k++;
        }
   }
}

s=0;
for(i=0; i<7; i++)
{
    for(j=0; j<3; j++)
    {
        if(r>d[i][j])
        {
            z[s]=0;
            z[s]=d[i][j];
            s++;
        }
    }
}

// Выводим матрицы Y,Z с проверкой условия, что матрицы не пустые
printf("\nElements of matrix B less than %.1f:\n", r);

if(k!=0)
{
    for(i=0;i<k;i++)
    {
        printf("%.1f\t", y[i]);
    }
    printf("\n");
}

else
{
    printf("There are no elements less than %5.2f in matrix B\n", r);
}

printf("\nElements of matrix D less than %.1f:\n", r);
if(s!=0)
{
    for(i=0;i<s;i++)
    {
        printf(" %.1f\t", z[i]);
    }
    printf("\n");
}

else
{
    printf("There are no elements less than %5.2f in matrix D\n", r);
}

}

[Tesh]

Спасибо огромное, понял в чём ступил, и вот это ещё, если не сложно, подскажите хоть как примерно сделать, чтобы не было повторных вхождений чисел... А то совсем что то идей в голове нету, а завтра всё это нужно уже сдать...

» Показать/скрыть спойлер... «

Код

/*
Дан файл f, компоненты которого являются целыми числами.
Записать в файл g, компоненты файла f, исключив повторные вхождения чисел.
*/

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

int main()
{
    int i = 0, k = 0, c[20],d[20];

    FILE *f;
    f = fopen("f.txt", "w+");
// Записываем в файл f.txt произвольные значения
    srand( (unsigned) time(NULL));
        for ( int i = 0; i < 20; ++i)
            {          
                 fprintf( f, "%d", rand() % 10);
                 if (i!=19) fprintf(f, " ");
            }
    rewind(f);
// Читаем из этого файла в массив всё
        do
            {
                fscanf (f, "%d", &c[i]);
                ++i;
            }
        while (!feof(f));
// Выводим на экран этот массив
    printf("Massive from f.txt:\n");
        for ( i = 0; i < 20; ++i ) printf ("%d ", c[i]);    
    printf("\n");
// Попытка записать элементы массива без повторных вхождений в файл g.txt
    FILE *g;
    g = fopen("g.txt", "w+");
    i = 0;
    int l;
    d[k]=c[i];
    fprintf( g, "%d ", d[k]);
        for ( i = 1; i < 20; ++i)                            //
            {                                                //
            for ( l = 0; l < 20; ++l)                        //
                {    if ( c[i] != d[k] )                        //
                        {    if ( c[l] != d[k] )                //
                            {    k = k + 1;                    // БРЕД
                                d[k]=c[i];                    //
                                fprintf( g, "%d ", d[k]);    //
                            }
                        }
                }
            }
// Печатаем значения нового массива, который мы писали в файл g.txt
    printf("Massive from g.txt:\n");
    for ( i = 0; i < k; ++i ) printf ("%d\t", d[i]);
    return 0;
}

Кому интересно, что в итоге получилось:

» Показать/скрыть спойлер... «

Код

#include <stdlib.h>
#include <stdio.h>
#include <time.h>

int main()
{    
     srand( (unsigned)time(NULL));

     //в дальнейшем в файл f записываются все числа, а в g только идентичные, то бишь без повторов
     FILE *f, *f1;
     f = fopen( "f.txt", "w+");
     f1 = fopen( "g.txt", "w+");

     //заполняем f
     //рандом можно варьировать - здесь 100 чисел и рандом 1-2-3
     for ( int j = 0; j < 100; ++j)
     { fprintf( f, "%d", rand() % 3 +1);
     if (j!=99) fprintf(f, " ");}
      
     //массив с собственно и состоит из этих идентичных чисел
     int c[1000];
     rewind(f);

     int i = 0, tt = 0;

     while (!feof( f )){    
          bool r = false;
          fscanf ( f, "%d", &tt);
          for ( int k = 0; k < i; ++k )
          {
               r = (c[k] == tt);
               if (r) break;
          }              
          if (!r)
          {
               c[i] = tt;
               ++i;
               fprintf( f1, "%d ", c[i-1]);
          }
     }
     fclose ( f );
     fclose ( f1 );
     return 0;
}

Сообщение отредактировано Tesh - 21.05.2008 - 19:55

[ElricDeFox]

Помогите пожалуйста сделать лабы на С ++

1)
Сформировать массив, содержащий сведения об отправлении поездов дальнего следования с Казанского вокзала. Структурный тип содержит поля: номер поезда, станция назначения, время отправления, время в пути, наличие билетов.
Написать программу, выдающую информацию:
- время отравления поездов в город Х во временном интервале от А до В часов;
- наличие билетов на поезд с номером ХХХ.
2)
Задать значения целочисленным элементам матриц
W = {wij} и Z = {zij}, где i = 0, 1, 2; j = 0, 1, 2,..., 7 и сформировать массивы T и S соответственно из элементов матриц W и Z, больших заданного числа Р.

Буду премного благодарен.

[Vala4i]

Задать значения целочисленным элементам матриц
W = {wij} и Z = {zij}, где i = 0, 1, 2; j = 0, 1, 2,..., 7 и сформировать массивы T и S соответственно из элементов матриц W и Z, больших заданного числа Р.

А прочитать несколько постов выше не судьба? Код практически аналогичной программы приводился несколькими постами выше.

[ElricDeFox]

А прочитать несколько постов выше не судьба? Код практически аналогичной программы приводился несколькими постами выше.

Сори.Слепой я .Щас буду разбиратся.

[KuT]

Люди помогите. Я не шарю в этом програмировании но надо сделать 2 простые задачки. Прямо до завтра надо. 1-сделал ещё на паре, а вот вторая всё кривая а третью даже не начинал ...+((

1-ая Задача.
Дано число X. Найти значение целой и дробной частей этого числа.
2-ая Задача.
Даны три действительных числа x;y;z. Найти корень квадратный из положительных чисел, а отрицательные возвести в квадрат.

Пожалуста, пожалуста, пожалуста...

[Prisoner]

1-ая Задача.
Дано число X. Найти значение целой и дробной частей этого числа.

Код

#include <iostream.h>
#include <stdio.h>
#include <conio.h>
int main()
{
int a;
double b,c;
cout <<"Введите число"<<endl;
cin>>b;
double (a=b);
if (a<b)
{
(c=b-a);
cout<<"Целая часть: "<<a<<endl;
cout<<"Дробная часть: "<<c<<endl;
}
else
{
cout<<"Вы ввели целое число: "<<b<<endl;
}
getch();
}

2-ая Задача.
Даны три действительных числа x;y;z. Найти корень квадратный из положительных чисел, а отрицательные возвести в квадрат.

Код

#pragma argsused
#include <iostream.h>
#include <conio.h>
#include <math.h>
int main()
{double a,b,c;
cout<<"Введите 3 числа через пробел"<<endl;
cin>>a>>b>>c;
if (a>0)
{a=sqrt(a); cout<<"a>0 \n a="<<a<<endl;}
else
{a=a*a; cout<<"a<0 \n a="<<a<<endl;}
if (b>0)
{b=sqrt(b); cout<<"b>0 \n b="<<b<<endl;}
else
{b=b*b; cout<<"b<0 \n b="<<b<<endl;}
if (c>0)
{c=sqrt(c); cout<<"c>0 \n c="<<c<<endl;}
else
{c=c*c; cout<<"c<0 \n c="<<c<<endl;}
getch();
}

Сообщение отредактировано Prisoner - 23.10.2008 - 15:15

[KuT]

Ай спасибо дорогущее!!!!! При многом благодарен! =))

[Prisoner]

Пожалуйста =)

[KuT]

Здраствуйте ещё раз! Нужна опять помощь с одной и той же лабой, но только на паскале...

3-я Задача.
Составить программу вычисления суммы кубов чисел от 25 до 125. (Здесь какие то циклы надо, я их пытался написать вроде заработало но всё не правельно работает)

3.
{Сумма кубов целых чисел}
var
i : integer;
s : Longint;
begin
s :=0;
for i:=25 to 125 do s := s +i*i*i;
end.

Эта вабще не то что то выдает.. Надо чтобы она как то выводила числа от 25 до 125... А она вабще нини...

Помогите пожалуйста...

Сообщение отредактировано KuT - 19.11.2008 - 21:22

[Vampire Hunter]

Для последнего значения
program kubi;
var
i:integer;
s:Longint;
begin
s :=0;
for i:=25 to 125 do s := s +i*i*i;
writeln('сумма =', s)
end.

для всех
program kubi2;
var i:integer
s:longint;
begin
s:=0;
i:=25;
while i<=125 do begin s:=s+i*i*i; writeln('при i=',i,'сумма=',s);i:=i+1;
end;
end

Сообщение отредактировано Vampire Hunter - 19.11.2008 - 23:06

[KuT]

Оооо наигромнейшее спасибо великодушный! =)

Сообщение отредактировано KuT - 20.11.2008 - 19:07

[Ready]

Нужна помощь в решении задач на паскале… Кто может — помогите. Очень нужно и очень срочно.

Задание 1. (if case)
Проверка действительности пропуска. Пропуск действителен, если код пропуска 100.В зависимости от введенного кода пропуска выдать сообщение ”Турникет открыт” или красный фон.

Задание 2. (if case)
Рис расфасован в два пакета. Вес первого – m кг, вес второго – n кг. Составьте программу, определяющую, какой пакет тяжелее – первый или второй. Используйте схему алгоритма.

Задание 5. (if case)
Составьте программу, реализующую эпизод применения компьютера в книжном магазине. Компьютер запрашивает стоимость книг и сумму денег, внесенную покупателем. Если сдачи не требуется, печатает «Благодарим за покупку», если денег внесено больше, то печатает «Возьмите сдачу» и указывает сумму сдачи, если денег недостаточно, то печатает об этом сообщение и указывает размер недостающей суммы.

Задание 6. (if case)
Составьте программу, имитирующую работу калькулятора. По запросу программы необходимо ввести два числа. Далее программа запрашивает действие. Если вводим «+», числа складываются и результат выводится на экран. Для действий: +, -, *, /.

Задание 7. (Линейные алгоритмы)
Вы положили деньги в банк на срочный депозит из расчета 60 % годовых. Напишите программу, которая будет вычислять причитающийся вам доход, когда вы будете задавать ей вопрос, сколько месяцев лежат деньги в банке.

Задача 8. (While. Repeat.)
Составьте программу, вычисляющую сумму квадратов чисел от 1 до введенного вами с клавиатуры целого n.

Задание 9. (String)
Задано существительное первого склонения, заканчивающееся на «а». Напечатайте это слово во всех падежах.

Задание 10. (Подпрограммы)
Напишите программу, состоящую из трех процедур и основной программы. Первая процедура организует ввод двух целых чисел X и Y, вторая вычисляет их сумму, третья выводит результат. Используйте эти процедуры в основной программе. Используйте X и Y как глобальные переменные. Эта программа послужит прообразом всех ваших будущих программ, т.к. в ней реализуется принцип работы любой системы: логически выделенные ввод, обработка и вывод результата.

Ещё:

Даны шифры предприятий, расчетный и реальный грузооборот их в ТКМ. Вывести список автопредприятий, у которых реальный грузооборот более чем на 10% ниже расчетного. Найти предприятие с минимальным грузооборотом.

---

Даны 3 слога. Определить сколько из них содержит гласную "У".

---

Из квадратной матрицы получить вектор Х, элементами которй будут элементы главной диагонали матрицы. Заменить первую строку матрицы вектором Х.

Сообщение отредактировано Ready - 5.12.2008 - 17:30