![]() |
|
![]() ![]() ![]() |
|
KaiseR |
|
|||
Unregistered |
Здравствуйте!
Целую неделю пытаюсь написть эти программы, но ничего не получается. Помогите пожалуйста. 1) Написать программу, которая считывает текст из файла и выводит на экран только строки, содержащие двузначные числа. 2)Дана целочисленная квадратная матрица. Определить: •произведение элементов в тех строках, которые не содержат отрицательных элементов; •максимум среди сумм элементов диагоналей, параллельных главной диагонали матрицы. |
|||
|
||||
tigger |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 456 Регистрация: 30.4.2005 Репутация: 2 Всего: 4 |
Выложи хотя бы что получилось!!!
|
|||
|
||||
KaiseR |
|
|||
Unregistered |
Это для 1)
#pragma hdrstop #include<stdio.h> #include<string.h> #include<conio.h> #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; FILE*f; AnsiString s; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { char buf[80]; String fName; if (!OpenDialog1->Execute()) return; fName=OpenDialog1->FileName; if ((f=fopen(fName.c_str(),"rt")) == NULL) {ShowMessage("Файл не удается открыть"); return; } //чтение из файла Memo1->Clear(); while(!feof(f)) { fgets(buf,80,f);//чтение строки в файл //if (buf[strlen(buf)-1]=='\n') //buf[strlen(buf)-1]=0; Memo1->Lines->Add(buf);//запись строки в Memo strcpy(buf,""); } fclose(f); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { int i; String fName; if (SaveDialog1->Execute()) return; fName=OpenDialog1->FileName; if ((f=fopen(fName.c_str(),"wt"))==NULL) {ShowMessage("Файл не удается создать"); return; } //запись в файл for(i=0;i<Memo1->Lines->Count;i++) { s=Memo1->Lines->Strings[i]+"\n"; fputs(s.c_str(),f); } fclose(f); ShowMessage("Данные записаны в файл"); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button3Click(TObject *Sender) { int j,i ; char SS[4]; for (j=1;(Memo1->Lines->Count)-1;j++) SS[2]=s[2];SS[3]=s[3];SS[4]=s[4];SS[1]=s[1]; i=3; for (i=0;i<s.Length();i++) SS[4]=s[i]; if(!(SS[1]>'1'&& SS[1]<'9')|| !(SS[4]>'1'&& SS[4]<'9')||(SS[2]<'1'&& SS[2]>'9')||(SS[3]<'0'&& SS[3]>'9')) { Memo2->Lines->Add(s[j]); } SS[1]=s[2];SS[2]=s[3];SS[3]=s[4]; } //------------------------------------------- |
|||
|
||||
tigger |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 456 Регистрация: 30.4.2005 Репутация: 2 Всего: 4 |
1
Это сообщение отредактировал(а) tigger - 18.12.2005, 14:14 Присоединённый файл ( Кол-во скачиваний: 69 ) ![]() |
|||
|
||||
tigger |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 456 Регистрация: 30.4.2005 Репутация: 2 Всего: 4 |
Задача №1
Компилятор ВС++B v.6 пример прилагаю: ![]() Присоединённый файл ( Кол-во скачиваний: 87 ) ![]() |
|||
|
||||
KaiseR |
|
|||
Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 18.12.2005 Репутация: нет Всего: нет |
tigger ОГРАМАДНЕЙШЕЕ ЧЕЛОВЕЧЕСКОЕ СПАСИБО!!!!!!!!!!!!!!!!!!
Если есть возможность, то помоги пожалуйста со второй задачей. |
|||
|
||||
tigger |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 456 Регистрация: 30.4.2005 Репутация: 2 Всего: 4 |
Выложи что у тебя по второй задаче есть. Мне так быстрее будет....
|
|||
|
||||
Гость_KaiseR |
|
|||
Unregistered |
У меня только в Делфи кусок.
max := 0; //искомое максимальное значение for s := 1 to m do begin //идем по всем строкам i := 1; //начинаем с первого столбца while i <= n do begin j := i; while (j <= n) and (w[s, j] = w[s, i]) do //пока идет серия одинаковых элементов inc(j); if j - i > max then begin //если серия максимальна max := j - i; //обновляем искомое максимальное значение maxs := s; //и номер строки, на которой он достигается end; i := j; end; end; writeln(maxs); //выводим номер искомой строки writeln(max); //выводим искомое максимальное значение |
|||
|
||||
tigger |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 456 Регистрация: 30.4.2005 Репутация: 2 Всего: 4 |
Лови исходник ко второй задаче...
P.S. Да на счет этого кода Делфовского что-то я так и не понял (да и не охота разбираться было) зачем он и что он делает наверное это ты мне глаза затер... Ну да ладно это все лирика. Успехов!!! Присоединённый файл ( Кол-во скачиваний: 32 ) ![]() |
|||
|
||||
KaiseR |
|
|||
Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 18.12.2005 Репутация: нет Всего: нет |
СПАСИБО, Tiqqer, я ОЧЕНЬ ТЕБЕ БЛАГОДАРЕН!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
![]() ![]() ![]() ![]() ![]() |
|||
|
||||
Павлюк |
|
|||
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 27.5.2008 Репутация: нет Всего: нет |
Написать программу, которая считывает английский текст из файла и выводит
его на экран, заменив каждую первую букву слов, начинающихся с гласной буквы, на прописную. Добавлено через 1 минуту и 3 секунды Помогите с задачей!!!Пожалуйста!!!! Написать программу, которая считывает английский текст из файла и выводит его на экран, заменив каждую первую букву слов, начинающихся с гласной буквы, на прописную. |
|||
|
||||
![]() ![]() ![]() |
Правила форума "С++ Builder" | |
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | C++ Builder | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |