Всем привет! Тааак прочел от начало до конца... Ну по 10 бальной шкале я б поставил ровно 5!
Quote
Коротко...но ясно
слишком уж кратко. Стиль написание не понравилось: гг живет в современном городе но он слишком уж литературно начинает рассказ а потом (зависали). 500 символов не хватит, а писать начало... нету смысла без конца..
Всем привет!!Как дела?)) Скоро(21 го марта) будет олимпиада(там за 1-ое место дают грант(ВУЗ)) и мне надо будет написать пару программ, на чем не важно но так как (претендентов) будет очень не мало каждый год программы пишут на нескольких языках с несколькими путями решений и мне надо изучить этот язык(в жюри люди не молодые и они респектуют низкоуровневое программирование) Извините если не так и не там создал тему. И так.. 1)На чем писать? в википедий нашел Turbo C и Borland C++ еще что нибудь есть?что лучше?. 2)Еще про Си, посоветуйте Один четки учебник. 500 символов не хватит, а писать начало... нету смысла без конца..
Сообщение отредактировал arys - Понедельник, 26 Декабря 2011, 16:28
Всем привет! Помагите плз!! Сейчас начнется олимпияда! Очень надо! Продлится 5 часов, 3 задачи. Я живу в Казахстане, и не думаю что я отобью у ково нибудь место. И "- Каждый должень делать сам", да да... , каждый должен нахадить пути решения задания))))
Добавлено (23.12.2011, 21:00) --------------------------------------------- Всем ещё раз привет.Нуббский вопрос: как сделать так что бы сделать типа некст рума(гамака)???
500 символов не хватит, а писать начало... нету смысла без конца..
var Form1: TForm1; r1,r2,r3,c1,c2,c3: string; mn,vt,nr:string; m,t,v,b,n:integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); begin mn:=combobox1.items[combobox1.itemindex]; if (mn='Îñêåìåí') then v:=1 ELSE if (mn='Àñòàíà') then v:=2 else if (mn='Àëìàòà') then v:=3 else
if (mn='') then label1.caption:='Âûáåðèòå èç ñïèñêà'; if (mn='') then label2.caption:='Âûáåðèòå èç ñïèñêà';
vt:=combobox2.Items[combobox2.itemindex]; if (vt='ñàìîëåò') then b:=1 else if (vt='ïîåçä') then b:=2 else if (vt='êàòåð') then b:=3 else if (vt='') then label1.caption:='Âûáåðèòå èç ñïèñêà'; if (vt='') then label2.caption:='Âûáåðèòå èç ñïèñêà';
nr:=combobox3.Items[combobox3.itemindex]; if (nr='1') then n:=1 else if (nr='2') then n:=2 else if (nr='3') then n:=3 else if (nr='') then label1.caption:='Âûáåðèòå èç ñïèñêà'; if (nr='') then label2.caption:='Âûáåðèòå èç ñïèñêà';
if (v=1) and (b=1) and (n=1) then label1.caption:='20:30'; label2.Caption:='30000òã';
if (v=1) and (b=1) and (n=2) then label1.Caption:='22:00'; label2.Caption:='25000òã';
if (v=1) and (b=1) and (n=3) then label1.Caption:='23:30'; label2.Caption:='25000òã';
if (v=1) and (b=2) and (n=1) then label1.Caption:='20:20'; label2.Caption:='25000òã';
if (v=1) and (b=2) and (n=2) then label1.Caption:='21:20'; label2.Caption:='20000òã';
if (v=1) and (b=2) and (n=3) then label1.Caption:='23:20'; label2.Caption:='20000òã';
if (v=1) and (b=3) and (n=1) then label1.Caption:='21:00'; label2.Caption:='35000òã';
if (v=1) and (b=3) and (n=2) then label1.Caption:='22:20'; label2.Caption:='30000òã';
if (v=1) and (b=3) and (n=3) then label1.Caption:='23:50'; label2.Caption:='30000òã';
if (v=2) and (b=1) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=1) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=1) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=2) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=2) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=2) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=3) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=3) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=2) and (b=3) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=1) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=1) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=1) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=2) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=2) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=2) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=3) and (n=1) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=3) and (n=2) then label1.Caption:='18:20'; label2.Caption:='2503òã';
if (v=3) and (b=3) and (n=3) then label1.Caption:='18:20'; label2.Caption:='2503òã';
end;
end.
Совсем забыл про проблему... Проблема в том что (ну если посмотреть на код то станет ясно в чем проблема), Лабел2 все время показывает одно и тоже. 500 символов не хватит, а писать начало... нету смысла без конца..
Сообщение отредактировал arys - Понедельник, 19 Декабря 2011, 18:16
Всем привет помогите плиз. Уже третьи день не могу найти ошибку!!! Вот прога весит всего 4кВ плиз посматрите..... 500 символов не хватит, а писать начало... нету смысла без конца..
Конечно верю. Верю в то что он есть. А есть ли он на самом деле или нет.. меня это не так уж волнует! 500 символов не хватит, а писать начало... нету смысла без конца..
