pascal массив

[capta1n]

лучше такие сообщения в личку

PS: мне не важно, кому решать, мне важно решать задачу именно по заданию, я всегда подхожу серьозно к любой работе, требующей ответственности, скорее это важнее для меня, нежели для того, кому я решаю задачу, хотя очень люблю помогать людям

[Fornarina]

Сообщение от puporev

to Capta1n
Нельзя же так серьезно относиться к решению задач для двоешников. Все равно оценить не смогут. Погоди, она еще сейчас код переделает и будет писать, что программа не работает.

знаете что, уважаемый, не слишком ли вы на себя берете?!

[capta1n]

мне кажется, это уже переходит во флуд, offtopic! сейчас модеры закроют тему, если это все продолжится, а можно вопрос Fornarina - а Вы считаете, что puporev не прав насчет двоешников?

[начинающий кодер]

знаете что, уважаемый, не слишком ли вы на себя берете

судя по фотографии вам лет 17-19 а мне 12 чувствуете разницу? эти задачи проходят в школе!!! у нас в гимназии пятикласники решают их причем даже на экзамен дают задачи сложнее чем у вас !!! 2Модераторам извините за нарушения но лички у меня нет!

[Fornarina]

Сообщение от capta1n

а можно вопрос Fornarina - а Вы считаете, что puporev не прав насчет двоешников?

считаю, что не - вот для того и создан этот раздел, что бы помогать, А НЕ ОСКОРБЛЯТЬ!!!!
в принципе у каждого свое мнение.
я не ожидала, что люди настолько эгоистичны....

[Fornarina]

Сообщение от начинающий кодер

судя по фотографии вам лет 17-19 а мне 12 чувствуете разницу? эти задачи проходят в школе!!! у нас в гимназии пятикласники решают их причем даже на экзамен дают задачи сложнее чем у вас !!! [B]

поздравляю вас!!!! видимо только человеческим отношениям вас никто не научил!

[начинающий кодер]

считаю, что не - вот для того и создан этот раздел, что бы помогать, А НЕ ОСКОРБЛЯТЬ!!

!! помощь-

Действие по глаг.помочь-помогать; участие в чьей-н. работе, облегчение, содействие кому-н., поддержка.

а вот вашей работы я не вижу!

[capta1n]

вот простой вариант вывода всех элементов, не больших А:

program xx;
const
 n = 10;
var
 b : array [1..n] of integer;
 a : integer;
 i : 1..n;
begin

  writeln ('Massiv (posledovatel''nost'') ',n,' 4isel: ');
  for i:=1 to n-1 do read(b[i]);
  readln(b[n]);

  write ('Vvedite A: '); readln(a);
  writeln ('Nova9 posledovatel''nost'':');
  for i:=1 to n do
   if b[i]<=A then write (b[i],' ');

  readln
end.

[Fornarina]

Сообщение от начинающий кодер

а вот вашей работы я не вижу!

спасибо за помощь!

[capta1n]

понимаешь, кодер, ты тоже неправ: не хочешь - не решай задачу, никто же тебя не заставляет - действительно, раздел создан чтобы помогать, то есть помочь разобраться в каком-нибудь коде чужом, но я столько задач с нуля прорешал на этом форуме, и никто не закрывал темы: просто если я имею желание помочь - я помогу, и скорее всего если понадобится напишу программу человеку: тем самым я набираюсь опыта + человеку помогаю + репутация по возможности - если мне не захочется что-то решать - я ничего не буду решать и писать тоже ничего не буду логично же

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