Известны данные о росте 15 юношей класса, по убыванию. ни одна пара учеников не имеет одинакового роста. в начале учебного года в класс поступил новый ученик (известно, что его рост не совпадает с ростом ни одного из учеников класса, превышает рост самого низкого ученика и меньше роста самого высокого а) вывести фамилии всех учеников, рост которых меньше роста новенького. на языке паскаль. через процедуры и функции. без условной функции (я так понимаю здесь необходима сортировка массива? ) нид хелп плз

Не сказано, как хранятся данные. допустим f[1..15] - фамилия, r[1..15] - рост readln(newr); for i: =1 to 15 do   if r[i]< newr then writeln(f[i]); ручной ввод: var   i,newr: integer;   f: array[1..15]of string;   r: array[1..15]of integer; begin writeln('введите фамилии и рост (в см) по убыванию'); for i: =1 to 15 do   begin   write('фамилия: ');   readln(f[i]);   write('рост (в см): ');   readln(r[i]);   end; writeln('введите рост (в см) нового уч-ка, не ни с кем'); readln(newr); for i: =1 to 15 do  if r[i]< newr then writeln(f[i]); end.

ну таких чисел несколько, да? типа 2*3*4 или 1*1*24. будем делать таким образом. программа находит такие числа и выводит на экран само число и их сумму не исключены и повторы в суммах(точнее они обязательно будут).

 

program ff;

uses crt; //можно и без этого но это удобнее

var i1,i2,i3: integer;

begin

  for i1: =1 to 9 do

  for i2: =0 to 9 do

    for i3: =0 to 9 do

      if i1*i2*i3=24 then writeln(i1*100+i2*10+i3,' сумма цифр ',i1+i2+i3);

end.

 

вопросы в личку. в следующий раз можешь задать здесь 

1)

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

2)а) прогнозирование 

б)контроль

в)анализ

г)регулирование (сомневаюсь, но скорее всего)