Есть ответ 👍

КАК ОТВЕТИТЬ НА ВОПРОС В ЭТОМ ПРИЛОЖЕНИЕ НА ПК

235
237
Посмотреть ответы 2

Ответы на вопрос:

dhgti
4,8(34 оценок)

Просто нажымаеш на кнопку ответить +(5б) если нет токой кнопки значит Ктото отвечает

Объяснение:

Дай коронку


1)const n1=1000; type mas=array[1..n1] of integer; var a: mas; n,i: integer; begin readln(n); for i: =1 to n do read(a[i]); for i: =1 to n do write(a[i],' '); writeln; end.а вторую и третью я объединила: const n1=1000; type mas=array[1..n1] of integer; var a: mas; i,min: integer; begin randomize; for i: =1 to 5 do  a[i]: =random(101)+0; for i: =1 to 5 do write(a[i],' '); writeln; min: =a[1]; for i: =2 to 5 do  if a[i]< min then min: =a[i]; writeln(min);   end.

Популярно: Информатика