Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.06.2012, 21:22   #1
Valechka
 
Регистрация: 16.03.2012
Сообщений: 5
По умолчанию сумма первых двух положительных элементов массива

Помогите ,пожалуйста, вычислить сумму первых двух положительных элементов матрицы (в с++).Вот код программы:


Код:
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "math.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int *m,q,n;
static int m1[20];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{n=StrToInt(Edit1->Text);
m=new int[n];
Memo1->Clear();
Memo2->Clear();

for(int i=0;i<20;i++)
    {q=rand()%100+1-rand()%100+1;
     m1[i]=q;
     Memo1->Lines->Add(IntToStr(m1[i]));
    }
for(int i = 0;i<n;i++)
    {q=rand()%100+1-rand()%100+1;
     m[i]=q;
     Memo2->Lines->Add(IntToStr(m[i]));
     }

}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Randomize;
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Button2Click(TObject *Sender)
{  int s,s1,i;
  s=0;
  for (i=0;i<20;i++)
  {if (m1[i]%3==0) s++;}
  Edit2->Text=IntToStr(s);
  s1=0;
   for (i=0;i<n;i++)
  {if (m[i]%3==0) s1++;}
  Edit3->Text=IntToStr(s1);

Последний раз редактировалось ACE Valery; 08.06.2012 в 22:07.
Valechka вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Разработка программы поиска двух соседних элементов массива, сумма которых максимальна Esterlen Помощь студентам 13 27.05.2012 18:58
Сумма положительных элементов Serjant0007 Общие вопросы C/C++ 1 31.03.2012 16:31
QBasic. Сумма и количество положительных элементов столбца массива hohol90 Помощь студентам 2 22.10.2011 11:22
Turbo C. Сумма квадратов положительных элементов массива ТАМ Помощь студентам 2 09.12.2009 14:53