N=20,[10,99]. Новый массив состоит из элементов исходного массива которые меньше...

Question

N=20,[10,99]. Новый массив состоит из элементов исходного массива которые меньше последнего элемента исходного массива. Помогите пожалуйста, через час уже надо сдавать это задание

Comments

Что значит N? количество элементов первого массива?

---

На каком языке программу написать?

---

паскаль

---

N это в начале const n=20

Answer 1

const

 N = 20;

var

 a, b: array[1..N] of integer;

 i, k: integer;

begin

 Randomize;

 for i := 1 to N do

 begin

   a[i] := 10 + Random(90);

   Write(a[i]:3);

 end;

 

 Writeln;

 k := 1;

 

 for i := 1 to N - 1 do

 begin

   if a[i] < a[N] then

   begin

     b[k] := a[i];

     Write(b[k]:3);

     k += 1

   end;

 end;

end.

Comments

begin var a := ArrRandom(20, 10, 99); a.Println; var b := a.Where(x -> x < a[19]).Println.ToArray;end.

---

Выбирайте что вам больше нравится. Думаю в школе вам вряд ли про лямбды рассказывают, хотя... все может быть.

---

на физике рассказывают

---

Write(b[k]:3); зачем эта строчка

---

Вывод чисел из массива b

---

а :3

---

формат вывода - 3 позиции под число, чтобы пробел не писать, с пробелом так: Write(b[k], ' ')

---

аа, понятно

---

Если вопросов больше нет, жмите лучший ответ, спасибо по желанию =)

---

спасибо