Форум
» Назад на решение задач по физике и термеху
Регистрация | Профиль | Войти | Забытый пароль | Присутствующие | Справка | Поиск

» Добро пожаловать, Гость: Войти | Регистрация
    Форум
    Информационные технологии
        Турбо Паскаль. Программирование на Pascal
Отметить все сообщения как прочитанные   [ Помощь ]
» Добро пожаловать на форум "Информационные технологии" «

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]
Модераторы: paradise, KMA
  

KMA



Долгожитель


Пожалуйсто помогите написать программу сумму от 0 до 100 с операторами цикла while,repeat,for,естественно на паскале,очень прошу....


А что мне за это будет? =)))
Для цикла while я тебе напишу, для repeat то же самое, только высказывание надо будет проотрицать.
i:=0;
while i<100 do
 begin
   inc (i);
   summ:=summ+i
 end;
writeLn (summ);

Для for
for i:=0 to 100 do
summ:=summ+i;



-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 29 апр. 2007 23:17 | IP
anuta



Новичок

так мне надо чтобы все эти операторы были в одной проге,задание тоже


(Сообщение отредактировал anuta 30 апр. 2007 12:07)

Всего сообщений: 7 | Присоединился: апрель 2007 | Отправлено: 30 апр. 2007 11:02 | IP
anuta



Новичок

А вы пробывали эту пргу запускать,у меня она не запускается

Всего сообщений: 7 | Присоединился: апрель 2007 | Отправлено: 30 апр. 2007 15:06 | IP
Siriusss



Новичок


Функция, которая определяет количество отрицательных элементов в строке будет выглядить так: ...

Если количество отрицательных элементов в строках одинаково, то прога выдает только первую, а надо все

-----
Иногда для того, чтобы выглядеть умным, полезно сделать что-нибудь дурное...

Всего сообщений: 28 | Присоединился: апрель 2007 | Отправлено: 1 мая 2007 15:53 | IP
KMA



Долгожитель


А вы пробывали эту пргу запускать,у меня она не запускается


Уважаемая, я за тебя программы писать не собирался. Я это делаю за деньги, на заказ, есть желание, вперед. У меня все работает прекрасно. Обычно (это на будущее), выкладывают только основной момент в программе, в котором возникли вопросы, а никак не всю.


Если количество отрицательных элементов в строках одинаково, то прога выдает только первую, а надо все


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

Code Sample:
nOtr:=0;  
for i:=1 to 2 do
begin
 nNow:=otrInRow (B, i); {текущее знач. отриц. элементов}
 if nNow>nOtr  {ищем отриц. максим. количество отриц. элем.}
    then nOtr:=nNow;
end;



И добавь после него следующее.
Code Sample:
 
for i:=1 to 2 do
begin
  if otrInRow (B, i)=nOtr
     then showRow (B, i);
end;



где showRow
Code Sample:
 
procedure showRow (m: mas; i: byte);
Begin
    for j:=1 to 4 do
      write (m[i, j], ' ');
    writeLn
End;




(Сообщение отредактировал KMA 2 мая 2007 23:32)

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 2 мая 2007 0:15 | IP
anuta



Новичок

Уважаемый КМА, а я вам просто так могу бесплатно намордник выслать.....,вам это просто неоходимо!!!!!

Всего сообщений: 7 | Присоединился: апрель 2007 | Отправлено: 2 мая 2007 11:44 | IP
Siriusss



Новичок


В чем в принципе сложность...

Спасибо, так бы и расцеловала

-----
Иногда для того, чтобы выглядеть умным, полезно сделать что-нибудь дурное...

Всего сообщений: 28 | Присоединился: апрель 2007 | Отправлено: 2 мая 2007 12:33 | IP
KMA



Долгожитель


Уважаемый КМА, а я вам просто так могу бесплатно намордник выслать.....,вам это просто неоходимо!!!!!


Мне намордник?! Оригинально! Честно, не в моих принципах ругаться с кем-то. Но человек, который не хочет разобраться с ОЧЕНЬ ПРОСТЫМ заданием, так называемым контрольным примером понимания циклов, то он просто леньтяй.

Я могу объяснить циклы, но тогда вы и должны попросить объяснить вам их, но никак не требовать от других решать конкретную задачу. Мне не сложно набрать его, не сложно объяснить, но задавайте тогда вопросы конкретнее. Мол так и так, не знаю что делать, не понимаю как работает, объясните или же что-нибудь посоветуйте. А не в тупую выкидывать задачу.

Да простят меня модераторы, за мой полуфлуд.  

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 2 мая 2007 23:28 | IP
anuta



Новичок

Вы  чёрствый человек,очень самоуверенный,высокомерный а это не есть хорошо.....!!!!!!!Это от сердца,не считайте за грубость.

Всего сообщений: 7 | Присоединился: апрель 2007 | Отправлено: 3 мая 2007 10:09 | IP
anuta



Новичок

А ещё если вы внимательней прочитаете моё собщение, то я никого не принуждала писать мне прогу, а попросила помочь..,а это разные вещи..

Всего сообщений: 7 | Присоединился: апрель 2007 | Отправлено: 3 мая 2007 10:14 | IP

Эта тема закрыта, новые ответы не принимаются

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]

Форум работает на скрипте © Ikonboard.com