Уважаемый, синтаксис 1С освоить не проблема. А как у Вас дела с бух. учетом?Меня зовут Лазарев Алексей, можно просто Лёха),
хотел бы добавить к своему письму и резюме - 1С не знаю, но другие системы программирования - Delphi, C++ учил недели две, а через месяц знал их как "русский" язык, а если учесть, что в 1С исходный код состоит вообще из русских слов - думаю высоких результатов достигну очень быстро.
Требуется 1С программистлюбого уровня - главное старательный
#21
Отправлено 30.10.2008, 22:36:56
#22
Отправлено 31.10.2008, 21:12:46
Уважаемый, синтаксис 1С освоить не проблема. А как у Вас дела с бух. учетом?
Меня зовут Лазарев Алексей, можно просто Лёха),
хотел бы добавить к своему письму и резюме - 1С не знаю, но другие системы программирования - Delphi, C++ учил недели две, а через месяц знал их как "русский" язык, а если учесть, что в 1С исходный код состоит вообще из русских слов - думаю высоких результатов достигну очень быстро.
А что же? Бух.учёт сложнее усвоить чем законы распространения радиоволн или теорию относительности?. Конечно может я просто чего-то важного не знаю и считаю, что экономика и бухгалтерия совсем не проблема, если есть хоть немного логики. Порой даже кажется, что слова "сальдо", "больдо" и др. используют чтоб непосвящённым было ничего не понятно. Извиняюсь если кого обидел, но это просто ИМХО).
Согласен, что кроме синтаксиса придётся учить ещё много разного, но во всём главное - желание.
#24
Отправлено 03.11.2008, 07:58:00
напишите плиз на дельфи или сипипе программку которая переворачивает переданную ей строку... то есть из строки "рама" делает строку "амар" ... передоваемая строка должна быть ASCIIZ stringDelphi, C++ учил недели две, а через месяц знал их как "русский" язык
Сообщение отредактировал Кими: 03.11.2008, 08:00:06
#25
Отправлено 03.11.2008, 09:27:42
напишите плиз на дельфи или сипипе программку которая переворачивает переданную ей строку... то есть из строки "рама" делает строку "амар" ... передоваемая строка должна быть ASCIIZ stringDelphi, C++ учил недели две, а через месяц знал их как "русский" язык
Пишу с телефона, так что опишу только главную часть алгоритма
...
word: string; i,n: integer; a:char;
Begin
// Вводим сроку любым, вам удобным, способом
...
n:=lenght(word);
for i:=1 to trunc(n/2) do begin
a:=word[i];word[i]:=word[n+1-i];
word[n+1-i]:=a; end;
//Ну тут выводим полученное
...
Ну вроде как-то так, но я не понял - причём тут ASCIIZ?
#32
Отправлено 08.11.2008, 14:32:59
напишите плиз на дельфи или сипипе программку которая переворачивает переданную ей строку... то есть из строки "рама" делает строку "амар" ... передоваемая строка должна быть ASCIIZ stringDelphi, C++ учил недели две, а через месяц знал их как "русский" язык
s:=Edit1.Text;
for i:=1 to length(edit1.Text) do begin
s3:= s[i];
Insert(s3,s2,1);
end;
edit2.Text:=s2;
#33
Отправлено 08.11.2008, 18:44:35
напишите плиз на дельфи или сипипе программку которая переворачивает переданную ей строку... то есть из строки "рама" делает строку "амар" ... передоваемая строка должна быть ASCIIZ stringDelphi, C++ учил недели две, а через месяц знал их как "русский" язык
s:=Edit1.Text;
for i:=1 to length(edit1.Text) do begin
s3:= s[i];
Insert(s3,s2,1);
end;
edit2.Text:=s2;
этот вариант понятней моего и выглядит красивей, но я люблю экономить память и время))
и получается строка "рама" здесь кодируется
for i:=1 to length(edit1.Text) do begin
s3:= s[i];
Insert(s3,s2,1);
end;
8 операциями,
а у меня:
for i:=1 to trunc(n/2) do begin
a:=word[i];word[i]:=word[n+1-i];
word[n+1-i]:=a; end;
надо 6 операций, т.е. экономия 25%))), а в памяти нет лишних строк.
ЗЗ: на деле выигрыш мы не заметим (правда если строка - не на несколько листов или не 1000 подобных операций одновременно)
и вообще - хватит здесь флудить)
#34
Отправлено 08.11.2008, 20:55:27
и даже сократил свой...))))
s:=Edit1.Text;
for i:=1 to length(edit1.Text) do begin
Insert(s[i],s2,1);
end;
edit2.Text:=s2;
флуд конечно...но интересно)))
#39
Отправлено 01.12.2008, 18:07:33
ну не знаю. я люблю делать быстро и понятно. я твой вариант посмотрел. код чем то похож на сортировку разных чисел(не помню какой метод).
и даже сократил свой...))))
s:=Edit1.Text;
for i:=1 to length(edit1.Text) do begin
Insert(s[i],s2,1);
end;
edit2.Text:=s2;
флуд конечно...но интересно)))
Э.... и получаем то же самое слово?
Количество пользователей, читающих эту тему: 1
пользователей: 0, неизвестных прохожих: 1, скрытых пользователей: 0