MUruZ.ru

Вернуться   MUruZ MU Online Forum > Поиск по форуму
Перезагрузить страницу Результаты поиска
Регистрация Справка Сообщество Календарь Сообщения за день Поиск

Страница 10 из 20 « Первая 89 10 1112 Последняя »
Показано с 226 по 250 из 500.
На поиск затрачено 0.11 сек.; сгенерировано 84 мин. назад. Поиск: Сообщения от: Microsoft
Раздел: Общий 22.02.2010, 22:48
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Примерно так. Подчеркивание - это пробелы,...

Примерно так. Подчеркивание - это пробелы, привычка :)

program Test;

const
__MAXSIZE = 100;
__DATAFILE = 'Data.txt'; // не помню, нужно ли указывать полный путь

var
__Data: text;
Раздел: Общий 22.02.2010, 21:58
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Понятно :) Пойду почитаю про паскаль, завтра...

Понятно :)

Пойду почитаю про паскаль, завтра постараюсь выложить.
Раздел: Общий 22.02.2010, 21:52
Ответов: 28
Просмотров: 6,541
Автор Microsoft
В чистом паскале можно определять структуры, как...

В чистом паскале можно определять структуры, как в object паскале?

ЗЫ:

type
__MyStruct = record
____a, b: integer;
____c: string;
__end;
Раздел: Общий 22.02.2010, 21:45
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Попробуй for i := 1 to 21 do if a[i] = 0 then...

Попробуй
for i := 1 to 21 do if a[i] = 0 then break else if (a[i] mod 2) = 0 then s := s + a[i];
Раздел: Общий 22.02.2010, 21:39
Ответов: 28
Просмотров: 6,541
Автор Microsoft
+ Массив у тебя 1..21, а циклы 1..20. Константы...

+ Массив у тебя 1..21, а циклы 1..20. Константы рулят :)
Раздел: Общий 22.02.2010, 21:34
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Да просто random(20). Это от 0 до 19. Или тебе...

Да просто random(20). Это от 0 до 19. Или тебе обязательно отрицательные числа нужны?



Просто у меня такое ощущение что If A[i] mod 2 = 0 и т.д. в тело цикла for уже не входит :)
Раздел: Общий 22.02.2010, 21:30
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Убери ";" после Break.

Убери ";" после Break.
Раздел: Общий 22.02.2010, 21:26
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Попробуй потестить без рандома. Например, для...

Попробуй потестить без рандома. Например, для теста заполни весь массив единицами.
Раздел: Общий 22.02.2010, 21:21
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Ну тогда __if (SomeArray[i] mod 2 = 0) then...

Ну тогда
__if (SomeArray[i] mod 2 = 0) then Summ := Summ + SomeArray[i];

А на чистом паскале никогда не писал, поэтому полностью программу составить не смогу :(
Раздел: Общий 22.02.2010, 21:13
Ответов: 28
Просмотров: 6,541
Автор Microsoft
Если чисто алгоритм, то все просто: ... ...

Если чисто алгоритм, то все просто:

...
Summ := 0;
for i := 0 to MAX do begin
__if SomeArray[i] = 0 then Break;
__if Function(SomeArray[i]) then Summ := Summ + SomeArray[i];
end;
...
Раздел: Общий 21.02.2010, 22:56
Ответов: 88
Просмотров: 18,576
Автор Microsoft
Да хрен его знает :)

Да хрен его знает :)
Раздел: Общий 21.02.2010, 16:34
Ответов: 88
Просмотров: 18,576
Автор Microsoft
Что будет? Будут жуткие лаги, оборудование...

Что будет? Будут жуткие лаги, оборудование резервное :)
Раздел: Общий 20.02.2010, 15:10
Ответов: 23
Просмотров: 7,870
Автор Microsoft
http://i053.radikal.ru/1002/e6/fad8a7cbfd17.jpg ...

http://i053.radikal.ru/1002/e6/fad8a7cbfd17.jpg

:-P
Раздел: Общий 19.02.2010, 22:04
Ответов: 210
Просмотров: 40,596
Автор Microsoft
/popcorn

/popcorn
Раздел: Общий 19.02.2010, 21:55
Ответов: 210
Просмотров: 40,596
Автор Microsoft
Блин, опять я что-то пропустил :)

Блин, опять я что-то пропустил :)
Раздел: Общий 14.02.2010, 23:21
Ответов: 18
Просмотров: 7,238
Автор Microsoft
"Пусть BERN держит, а то альтера заберет дд" (с)...

"Пусть BERN держит, а то альтера заберет дд" (с) НикМо :P
Раздел: Общий 14.02.2010, 18:12
Ответов: 142
Просмотров: 27,427
Автор Microsoft
EddyLove :)

EddyLove :)
Раздел: Общий 14.02.2010, 16:44
Ответов: 558
Просмотров: 270,038
Автор Microsoft
Очень грустная песня :)...

Очень грустная песня :) http://www.youtube.com/watch?v=7RYqurpqusk
Раздел: Общий 13.02.2010, 18:21
Ответов: 142
Просмотров: 27,427
Автор Microsoft
Альт+Ф4 и дойдешь куда угодно. Ну или свитч.

Альт+Ф4 и дойдешь куда угодно. Ну или свитч.
Раздел: Общий 12.02.2010, 01:56
Ответов: 278
Просмотров: 70,820
Автор Microsoft
Мы забираем этот спот :D Очень напомнило "спот...

Мы забираем этот спот :D Очень напомнило "спот захвачен" :)
Раздел: Общий 11.02.2010, 20:47
Ответов: 80
Просмотров: 24,460
Автор Microsoft
Был уже такой тест :) Нонрес сервер назывался. Не...

Был уже такой тест :) Нонрес сервер назывался. Не прижилось. Да и дохода от него не будет, следовательно и заморачиваться админы не будут.
Раздел: Общий 10.02.2010, 13:17
Ответов: 77
Просмотров: 20,595
Автор Microsoft
В атлансе/таркане покачайтесь, поймете где ад :) ...

В атлансе/таркане покачайтесь, поймете где ад :)

А если серьезно, то да. Ведут себя как крысы.
Раздел: Общий 10.02.2010, 12:51
Ответов: 25
Просмотров: 7,693
Автор Microsoft
Какой нафиг праздник? КС! :P

Какой нафиг праздник? КС! :P
Раздел: Общий 09.02.2010, 17:28
Ответов: 16
Просмотров: 6,731
Автор Microsoft
Фильм хороший. Когда-то давно его смотрел....

Фильм хороший. Когда-то давно его смотрел. Спасибо автору что напомнил о нем. Обязательно пересмотрю.
Раздел: Общий 08.02.2010, 05:05
Ответов: 99
CS
Просмотров: 23,088
Автор Microsoft
Да, кстати. Неужели кроме Ларка никто скринов не...

Да, кстати. Неужели кроме Ларка никто скринов не делал? Выкладывайте, всем интересно :)
Показано с 226 по 250 из 500.
Страница 10 из 20 « Первая 89 10 1112 Последняя »

 

Текущее время: 07:55. Часовой пояс GMT +3.
Архив - Вверх

Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.