• 
  • 26 November 2013
  • Химия
  • Автор: Nik435

  

  Решить задачу в pascal
  
  Королева арифметики решила озеленить свою столицу и заодно сосчитать жителей. Для этого она приказала всем посадить вокруг каждого дома столько деревьев, сколько в этом доме живёт членов семей, а также их слуг. Определить номер самого населённого дома (количество деревьев, растущих возле каждого дома записано в виде последовательности, заканчивающейся числом ноль).

• 
  
• 
  • 26 November 2013
  • Ответ оставил: NightDeer

  Var a,b,n,k:integer;
  begin
  a:=0; read(n);
  for k :=1 to n do begin
  while b<>0 do begin
  read(b); if a<b then a:=b;
  end; end; end.

  Оцените ответ

  1
• 
  
• 
  • НЕ НАШЛИ ОТВЕТ?

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

  Найти другие ответы
• Ответить

Последние и похожие вопросы

• 
  • 17 November 2013
  • Обществознание
  • Автор: annabond015

  Являются ли родственными слова короб - коробка- коробочка, товар - товарный- растоварец?
• 
  • 17 November 2013
  • Литература
  • Автор: Polinka000000

  В каком направлении от Южной Америки находятся:а) Антарктидаб) Африкав) Евразия
• 
  • 17 November 2013
  • Математика
  • Автор: Dmitriew2380

  От дачного участка до железнодорожной станции и обратно дачник на велосипеде едет 24 мин. Если он...