Рейтинг

Могу проконсультировать - ошибок валом, и все тупо из-за непонимания/маленького опыта)

1)

var n,i:integer;
begin
    readln(n);
    for i:=1 to n do
          if n mod i = 0 then write(i,' ');
    readln;
end.

2)

var n,i:integer;

begin
n := 0;
    for i:=10 to 99 do
          if i mod 7 = 0 then n:=n+i;
   
    write(n);
end.

Паскаль уже лет 15 не видел, но вроде должно работать. В 3й задаче условие непонятное, как однозначное число может быть кратно 11?

Знаешь, есть такая штука, гугл вроде называется. Ходят слухи, что там можно найти все, ну или почти все. 

САЙТ

Так вот, ссылка, что выше, ведет на сайт, посвященный программированию и не только на паскале. Все, что нужно - мозг и прямые руки.

Четвертная решается у братишки, но ему видимо до фонаря, раз пишет, как бы странно это не звучало, братишка братишки. . ЧЕТ ПАДАЗРИТЕЛЬНА)

P.S Хороший прием, дать больше информации чем требовалось, чтобы не у кого не возникло подозрений в достоверности сведений, в данном случае про братка.

Так как в цикле мы используем две операции:

 ->1. Подсчет выражения (y=...)

 ->2. Вывод полученного результата.

 

Если мы не будем использовать операторные скобки, то, по синтаксису паскаля, только одна операция после объявления цикла будет выполняться в цикле (в нашем случае подсчет y=), а последняя операция будет вне цикла и выполнится один раз.

 

Пример, что будет, если забыть написать операторные скобки:

 

for i:=1 to 3 do

y:=i*i;

writeln(y);

 

Будет выведено 9.

 

Пример, как надо сделать:

 

for i:=1 to 3 do  begin
y:=i*i;
writeln(y);

end;

 

Будет выведено:

1

4

9

http://pastebin.com/1fCuznem

- Нет единой сетки (все должно быть ровно и разлиновано, отступы одинаковыми, иконки одинаковыми, шрифты тоже иметь логичную одинаковость и тд)
- Заголовки меньше контента - плохо
- Два логотипа один под другим - зачем?
- Сверху панель не прилегает к экрану - идея или косяк? Если идея то почему не использовано пустое пространство
- В мониторинге разбить бы информацию по-интереснее, а то все как единый текст

Да вам староверам не угодишь, дай вам волю - и дефолтный дизайн от булки годов 2000 - будет для вас лучшим)

Чем проще, тем лучше, зачем мудрить xDD Лично по мне - новый дизайн грузится гораздо быстрее предыдущего. За это - отдельное человеческое спасибо =)

Уходить из-за смены дизайна? о_О

Насмешил....

 

Уходить - нет, а вот меньше посещать - вполне возможно ..

Помню когда его сменили на черно-синий много кто ушел с СА, в том числе и я.

Уходить из-за смены дизайна? о_О

Насмешил....

Из тебя выйдет замечательный отец, который научит своих детей быть сильными и крепкими духом, лишь только в угрожающей здоровью или жизни ситуации они смогут поднять руку на кого-либо. Те качества, которые в тебе развиты - это есть твой характер, заложенный в утробе матери, развитый в процессе становления как личности. Гордись тем, что ты силен физически и силой воли, не в коем случае не меняйся и не слушай советы кэпов и людей, с заложенным инстинктом «быдловоинов».

Бей всех.Если что то сказал сразу бей в лицо. Так побьешь нескольких и мы потом не увидим тебя на СА, уже будешь в зоне показывать свою силу. А так с алкоголем поборешь страх ударить, тебе будет казаться что ты суперсильный. А лучше не обращай внимания на пи3**болов. Мой тренер так ударил трех, они выпили и дое***ись. Тренеру несколько лет условно дали + платить им лечение

Бей,например,в плечо, посильнее, что бы человек понял,что за то что он делает он может отхватить. Ну или предупреди его, что так делать не нужно.

Я считаю, что лучше направить ресурсы которые идут на пустые кс го сервера стоит потратить на улучшения других сервером на например ксс дд2 онли, или тф2 оранж серв. hl2 и DoD я считаю вообще не стоило открывать, так как тут мало кто любит дод, хотя игра супер.
Так же есть сервера которые не имеют онлайн только место и ресурсы занимают.

и ещё вот такой вопрос. Не работает stripper source когда стоит metamod 1.9.1
а когда 1.8.7 Тогда он работает что надо сделать? sourcemod 1.4.6
Я хотел чтобы стоял metamod 1.9.1

Ну в конце 2009 или в начале 2010 года друг заставил скачать ксс, ну я скачал, стал искать сервера и сразу почему то наткнулся на MG. Не знал что это такое, просто название понравилось, ну и зашел поиграть, было интересно.
Потом где то на пол года забросил это все дело и где то летом, купил лицензию..
Потом стал играть на MG уже с лицухи.
Потом зарегался на форуме, в 2011. Что бы создать тему "Детские голоса"
Ибо много писклявых голосов было на серве много.
Затем, решил стать админом, при Ахарте. В то время было весело.
Вот.

[quote="aby;512727"]напишите кто как попал на наш портал[/quote]
Я попал на портал в 2009 году, искал сервера для cs:s, в яндексе И чисто случайно попал сюда.
Играл очень часто, но ни с кем не подружился. Чуть позже я начал играть в minecraft на аврелинке, до выхода полной версии (т.е до 1.0.0, так как потом сервер стал УГ), там познакомился с эку Стал заместителем мэра PP (peaceful place, позже PC, писфул сити), очень долго общались с ним, до того пока-он не стал подниматься по должностям на СА, а жаль
P.S, этот акк реган не в 2009, мой настоящий акк знает только эку >=D