Hip-Hop.Ru

Hip-Hop.Ru (https://www.hip-hop.ru/forum/)
-   Компьютеры и Интернет (https://www.hip-hop.ru/forum/kompyutery-i-internet-f186)
-   -   Программисты / Компьютерные техники, которые НИКОГДА не спят! [Беседка] (https://www.hip-hop.ru/forum/programmisty-kompyuternye-tehniki-kotorye-nikogda-ne-spyat-besedka-252443/)

Delpix 17 мая 2011 20:39

Последний штрих.
 
Программу я сделал,все работает. Еще я здела к ней меню которое работает на половину. Программа отказывается сохранять в файл (Окно сохранения выбивает, но текст не сохраняется). Помогите найти ошибку.
Показать скрытый текст

[CODE]#include <iostream>
#include <stdio.h>
#include <conio.h>
#include <fstream>
#include <cstring>
using namespace std;
void main()
{
setlocale (LC_ALL,"Russian");
cout<<"1. Ввод с клавиатуры"<<endl;
cout<<"2. Ввод из файла"<<endl;
cout<<"Введите номер вашего выбора"<<endl;
int ans;
cin>>ans;
if(ans!=1&& ans!=2)
{
cout<<"Ошибка!";
return;
}
char str[50];
if(ans==1)
{
cout<<"Введите строку: "<<endl;
cin.get();
cin.getline(str,49);
}
if(ans==2)
{
ifstream start("start.txt");
if(!start)
{
cout<<"Фаила нет!";
return;
}
start.getline(str,49);
start.close();
}
int i=0;
int size=strlen(str);
char c;
bool fin=true;
cout<<"1. Вывод в окне"<<endl;
cout<<"2. Вывод в файл"<<endl;
cout<<"Введите номер вашего выбора "<<endl;
int ans2;
cin>>ans2;
if(ans2!=1&& ans2!=2)
{
cout<<"Ошибка! ";
return;
}
if(ans2==1)
{
cout<<"Старая строка: "<<str<<endl;
cout<<"Новая строка: ";
for (int t=0;t<size;t++)
{
c=str[t];
if ((c=='.')||(c=='!')||(c=='?')) { fin=true; putchar (c); continue;}
if ((fin)&&(c!=' ')) {putchar (toupper(c)); fin=false;}
else putchar (c);
}
cout<<endl;
}
if(ans2==2)
{
ofstream finish("finish.txt");
if(!finish)
{
cout<<"Файла нет!";
return;
}
cout<<"Старая строка: "<<str<<endl;
cout<<"Новая строка: ";
for (int t=0;t<size;t++)
{
c=str[t];
if ((c=='.')||(c=='!')||(c=='?')) { fin=true; putchar (c); continue;}
if ((fin)&&(c!=' ')) {putchar (toupper(c)); fin=false;}
else putchar (c);
}
cout<<"\n";
finish<<endl;
finish.close();
}
}[/CODE]

Raz0r 18 мая 2011 13:49

шарящие програмеры в пм напишите ) есть задание

Hammer 18 мая 2011 16:09

Цитата:

Цитата от Raz0r (Сообщение 1073296482)
шарящие програмеры в пм напишите ) есть задание

Язык то хоть какой?

Raz0r 18 мая 2011 16:17

Цитата:

Цитата от Hammer (Сообщение 1073297553)
Цитата:

Цитата от Raz0r (Сообщение 1073296482)
шарящие програмеры в пм напишите ) есть задание

Язык то хоть какой?

пофиг какой, какой удобнее

RabbiT 18 мая 2011 16:58

Y4il : JAVA, OOP, SQL, OSM, .NET, HTML, CSS, Ajax JavaScript....i tak dalee.

Hammer 18 мая 2011 17:03

Цитата:

Цитата от RabbiT (Сообщение 1073298059)
Y4il : JAVA, OOP, SQL, OSM, .NET, HTML, CSS, Ajax JavaScript....i tak dalee.

Ajax и есть JavaScript, только асинхронный.

зулусик просто 18 мая 2011 20:34

и джава от ооп тоже не отделима, доппустим-то

Лжэц 18 мая 2011 21:01

Цитата:

Цитата от @ MaRiO @ (Сообщение 1073286309)
Всем доброй ночи, в общем буду краток, ситуация такая, помогите мне разобраться, в общем я поставил себе винду 7, до этого была ХР, у меня при пользовании микро эхо, как это убрать, у меня была такая же фигня на ХР но один знакомый приходил, установил прогу, как я понимаю это какой то аудио регулятор, но к сожалению он не сохранился, а этого знакомого отыскать не могу, в общем может у кого была такая проблема, подскажите как решить ситуацию, хочется уже что нибудь записать...

скорее всего это примета что нужно не петь реп.
Показать скрытый текст
было бы ахуенней если вместо эхо был автотюн:morj:


подскажите как лучше оформить прогу на делфи?
есть чтото типо xp manifest только в стиле виста\севен?хотелось бы оформить типо виста\севен.

Hammer 18 мая 2011 21:28

Цитата:

Цитата от Лжэц (Сообщение 1073300363)
Цитата:

Цитата от @ MaRiO @ (Сообщение 1073286309)
Всем доброй ночи, в общем буду краток, ситуация такая, помогите мне разобраться, в общем я поставил себе винду 7, до этого была ХР, у меня при пользовании микро эхо, как это убрать, у меня была такая же фигня на ХР но один знакомый приходил, установил прогу, как я понимаю это какой то аудио регулятор, но к сожалению он не сохранился, а этого знакомого отыскать не могу, в общем может у кого была такая проблема, подскажите как решить ситуацию, хочется уже что нибудь записать...

скорее всего это примета что нужно не петь реп.
Показать скрытый текст
было бы ахуенней если вместо эхо был автотюн:morj:


подскажите как лучше оформить прогу на делфи?
есть чтото типо xp manifest только в стиле виста\севен?хотелось бы оформить типо виста\севен.

Alpha Skins - тут без вариантов.

@ MaRiO @ 18 мая 2011 21:57

Цитата:

Цитата от Лжэц (Сообщение 1073300363)
Цитата:

Цитата от @ MaRiO @ (Сообщение 1073286309)
Всем доброй ночи, в общем буду краток, ситуация такая, помогите мне разобраться, в общем я поставил себе винду 7, до этого была ХР, у меня при пользовании микро эхо, как это убрать, у меня была такая же фигня на ХР но один знакомый приходил, установил прогу, как я понимаю это какой то аудио регулятор, но к сожалению он не сохранился, а этого знакомого отыскать не могу, в общем может у кого была такая проблема, подскажите как решить ситуацию, хочется уже что нибудь записать...

скорее всего это примета что нужно не петь реп.
Показать скрытый текст
было бы ахуенней если вместо эхо был автотюн:morj:


подскажите как лучше оформить прогу на делфи?
есть чтото типо xp manifest только в стиле виста\севен?хотелось бы оформить типо виста\севен.

мне не только реп петь но и для скайпа надо

Лжэц 20 мая 2011 10:39

Вложений: 1
теперь вопрос по Alpha Skins.
Установил по инструкции его.Кидаем на форму любой его компонент вылазиит
Цитата:

[Fatal Error] Unit1.pas(7): File not found: 'sButton.dcu'
используем старые компоненты все норм.
Прочитал что нужно добавить путь до библиотеки,какой путь и куда именно?

Ай-Tи 20 мая 2011 11:03

Такой вопрос: как на Vb к программе прикрепить какой либо файл (текстовый, .dll и
т.д.) чтобы можно при установке проги на другой комп его без проблем открыть:confused:

trequartista 20 мая 2011 11:39

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

Добавлено через 30 минут 3 секунды
а всё ненад сам всё вспомнил

Hammer 20 мая 2011 14:52

Цитата:

Цитата от Лжэц (Сообщение 1073310345)
теперь вопрос по Alpha Skins.
Установил по инструкции его.Кидаем на форму любой его компонент вылазиит
Цитата:

[Fatal Error] Unit1.pas(7): File not found: 'sButton.dcu'
используем старые компоненты все норм.
Прочитал что нужно добавить путь до библиотеки,какой путь и куда именно?

Давно это было.
Если память не изменяется, то пропиши:
Tools->Enviroment Options->Library->Library path - путь к папке D7.
Для Browsing path тоже самое.

tatu_cat_69 20 мая 2011 18:58

Цитата:

Цитата от Hammer (Сообщение 1073283393)
Цитата:

Цитата от tatu_cat_69 (Сообщение 1073283378)
в sql кто-нибудь шарит?

Смотря что надо.

P.S. Лучше сразу писать проблему. Быстрее выйдет. :king:

какие экзамены сдавали все студенты.
http://zalil.ru/31082768
тут база на sql server 2003

Лжэц 20 мая 2011 23:02

Цитата:

Цитата от Hammer (Сообщение 1073311736)
Цитата:

Цитата от Лжэц (Сообщение 1073310345)
теперь вопрос по Alpha Skins.
Установил по инструкции его.Кидаем на форму любой его компонент вылазиит
Цитата:

[Fatal Error] Unit1.pas(7): File not found: 'sButton.dcu'
используем старые компоненты все норм.
Прочитал что нужно добавить путь до библиотеки,какой путь и куда именно?

Давно это было.
Если память не изменяется, то пропиши:
Tools->Enviroment Options->Library->Library path - путь к папке D7.
Для Browsing path тоже самое.

спасибо разобрался со скинами,прога заметно преобразилась:)

mrCloud 20 мая 2011 23:47

помогите бездарю.
элементарное решить не могу.
http://rghost.ru/7247931 тут задание.на "сделать блок-схему" не обращать внимания, мне бы алгоритм.
решил вот так

Цитата:

var
x:integer;
y:real;
begin
writeln('Please type x:');
readln(x);
y:=(3*x*x-4)/(x+1);
writeln('y=',y:4:4);
readln
end.
end.

tatu_cat_69 21 мая 2011 07:31

Цитата:

Цитата от alligator[7Вагон] (Сообщение 1073315695)
помогите бездарю.
элементарное решить не могу.
http://rghost.ru/7247931 тут задание.на "сделать блок-схему" не обращать внимания, мне бы алгоритм.
решил вот так

Цитата:

var
x:integer;
y:real;
begin
writeln('Please type x:');
readln(x);
y:=(3*x*x-4)/(x+1);
writeln('y=',y:4:4);
readln
end.
end.

http://www.twirpx.com/file/22495/
http://soft.cnews.ru/windows/development/delphi/avtoshema/
вот тут прога, выбирай любую. я пользовался первой кажется

Добавлено через 1 минуту 48 секунд
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

mrCloud 21 мая 2011 09:19

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073316597)
Цитата:

Цитата от alligator[7Вагон] (Сообщение 1073315695)
помогите бездарю.
элементарное решить не могу.
http://rghost.ru/7247931 тут задание.на "сделать блок-схему" не обращать внимания, мне бы алгоритм.
решил вот так

Цитата:

var
x:integer;
y:real;
begin
writeln('Please type x:');
readln(x);
y:=(3*x*x-4)/(x+1);
writeln('y=',y:4:4);
readln
end.
end.

http://www.twirpx.com/file/22495/
http://soft.cnews.ru/windows/development/delphi/avtoshema/
вот тут прога, выбирай любую. я пользовался первой кажется

Добавлено через 1 минуту 48 секунд
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

да я блокс схемы рисовать умею.мне бы сказать правильно я решил или нет.

Hammer 21 мая 2011 12:20

Цитата:

Цитата от alligator[7Вагон] (Сообщение 1073315695)
помогите бездарю.
элементарное решить не могу.
http://rghost.ru/7247931 тут задание.на "сделать блок-схему" не обращать внимания, мне бы алгоритм.
решил вот так

Цитата:

var
x:integer;
y:real;
begin
writeln('Please type x:');
readln(x);
y:=(3*x*x-4)/(x+1);
writeln('y=',y:4:4);
readln
end.
end.

Правильно.

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073316597)
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

Вечерком подумаю, может составлю запрос.

mrCloud 21 мая 2011 12:26

Цитата:

Цитата от Hammer (Сообщение 1073317742)
Цитата:

Цитата от alligator[7Вагон] (Сообщение 1073315695)
помогите бездарю.
элементарное решить не могу.
http://rghost.ru/7247931 тут задание.на "сделать блок-схему" не обращать внимания, мне бы алгоритм.
решил вот так

Цитата:

var
x:integer;
y:real;
begin
writeln('Please type x:');
readln(x);
y:=(3*x*x-4)/(x+1);
writeln('y=',y:4:4);
readln
end.
end.

Правильно.

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073316597)
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

Вечерком подумаю, может составлю запрос.

фух.значит, не всё потеряно;D

tatu_cat_69 22 мая 2011 11:07

Цитата:

Цитата от Hammer (Сообщение 1073317742)

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073316597)
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

Вечерком подумаю, может составлю запрос.

спасибо, уже сделал вчера на паре. оказалось не все так сложно. просто преподаватель говорила вначале одну подсказку, а она оказалась не всегда работает.

Добавлено через 1 день 8 часов 42 минуты
Цитата:

Select t.[Наименование предмета], avg (t.Оценка/1.0) as [Средняя балл по предмету]
from
(
select [Наименование предмета],[Код студента], [Оценка 1] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 1]=Предметы.[Код предмета]
Where Оценки.[Код предмета 1] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 2] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 2]=Предметы.[Код предмета]
Where Оценки.[Код предмета 2] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 3] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 3]=Предметы.[Код предмета]
Where Оценки.[Код предмета 3] = [Код предмета]
)
as t

Group by t.[Наименование предмета]
если кто поможет с комментариями вот этого запроса то буду очень благодарен. просто ваще не понимаю что за t. после Select и почему она нужна если есть union

зулусик просто 23 мая 2011 20:29

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073323192)
Цитата:

Цитата от Hammer (Сообщение 1073317742)

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073316597)
и еще если кто поможет с Access
В общем есть БД(оснащение оборудование кафедры), но вот загвостка. надо вывести кол-во определенного вида оборудования(например видеокарты) в каждой аудитории на форме главной. Сколько всего оборудования в аудитории я вывожу, а вот как сделать по видам не знаю. может кто подскажет

БД тут: http://zalil.ru/31082744

Вечерком подумаю, может составлю запрос.

спасибо, уже сделал вчера на паре. оказалось не все так сложно. просто преподаватель говорила вначале одну подсказку, а она оказалась не всегда работает.

Добавлено через 1 день 8 часов 42 минуты
Цитата:

Select t.[Наименование предмета], avg (t.Оценка/1.0) as [Средняя балл по предмету]
from
(
select [Наименование предмета],[Код студента], [Оценка 1] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 1]=Предметы.[Код предмета]
Where Оценки.[Код предмета 1] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 2] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 2]=Предметы.[Код предмета]
Where Оценки.[Код предмета 2] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 3] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 3]=Предметы.[Код предмета]
Where Оценки.[Код предмета 3] = [Код предмета]
)

as t

Group by t.[Наименование предмета]
если кто поможет с комментариями вот этого запроса то буду очень благодарен. просто ваще не понимаю что за t. после Select и почему она нужна если есть union

t у тебя - это таблица(псевдоним таблицы), получающаяся из выделенного запроса. а запись вида t.Наименование_предмета - это значит, что поле Наименование_предмета берётся из этой таблицы t. и так далее

tatu_cat_69 24 мая 2011 21:46

Цитата:

Цитата от зулусик просто (Сообщение 1073335286)
Цитата:

Цитата от tatu_cat_69 (Сообщение 1073323192)
Цитата:

Цитата от Hammer (Сообщение 1073317742)



Вечерком подумаю, может составлю запрос.

спасибо, уже сделал вчера на паре. оказалось не все так сложно. просто преподаватель говорила вначале одну подсказку, а она оказалась не всегда работает.

Добавлено через 1 день 8 часов 42 минуты
Цитата:

Select t.[Наименование предмета], avg (t.Оценка/1.0) as [Средняя балл по предмету]
from
(
select [Наименование предмета],[Код студента], [Оценка 1] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 1]=Предметы.[Код предмета]
Where Оценки.[Код предмета 1] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 2] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 2]=Предметы.[Код предмета]
Where Оценки.[Код предмета 2] = [Код предмета]

union
select [Наименование предмета],[Код студента], [Оценка 3] as [Оценка]
from Оценки inner join Предметы
on
Оценки.[Код предмета 3]=Предметы.[Код предмета]
Where Оценки.[Код предмета 3] = [Код предмета]
)

as t

Group by t.[Наименование предмета]
если кто поможет с комментариями вот этого запроса то буду очень благодарен. просто ваще не понимаю что за t. после Select и почему она нужна если есть union

t у тебя - это таблица(псевдоним таблицы), получающаяся из выделенного запроса. а запись вида t.Наименование_предмета - это значит, что поле Наименование_предмета берётся из этой таблицы t. и так далее

т.е. у меня получается тут делается таблица из объединения запросов? мне бы просто подробнее, если не сложно

зулусик просто 24 мая 2011 21:51

Цитата:

Цитата от tatu_cat_69 (Сообщение 1073345017)
Цитата:

Цитата от зулусик просто (Сообщение 1073335286)
Цитата:

Цитата от tatu_cat_69 (Сообщение 1073323192)

спасибо, уже сделал вчера на паре. оказалось не все так сложно. просто преподаватель говорила вначале одну подсказку, а она оказалась не всегда работает.

Добавлено через 1 день 8 часов 42 минуты


если кто поможет с комментариями вот этого запроса то буду очень благодарен. просто ваще не понимаю что за t. после Select и почему она нужна если есть union

t у тебя - это таблица(псевдоним таблицы), получающаяся из выделенного запроса. а запись вида t.Наименование_предмета - это значит, что поле Наименование_предмета берётся из этой таблицы t. и так далее

т.е. у меня получается тут делается таблица из объединения запросов?

да. скорее даже это называется "представление". можно даже эти запросы в отдельный запрос переписать(и назвать этот запрос "Запрос1" например), а потом писать так:

Цитата:

SELECT t.Код FROM Запрос1 t
по-моему, так, если я не ебусь в мозг совсем:ugly:


Часовой пояс GMT +3, время: 21:02.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.

vBulletin Optimisation provided by vB Optimise (Pro) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.