volgakup
10.03.2022 10:05

Дан массив из 100 элементов. необходимо заполнить первые n из них первыми n натуральными числами в порядке убывания. формат входных данных с клавиатуры вводится натуральное число n (n≤100n≤100). формат выходных данных требуется вывести содержимое первых n элементов массива после заполнения согласно условию . элементы должны разделяться пробелами.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
кис88
25.08.2020 19:27
Var  ar:array[1..100]of integer;
  i,n:integer;
begin
read(n);
for i:=n downto 1 do
ar[i]:=i;
for i:=n downto 1 do
write(ar[i],' ');
end.
0,0(0 оценок)
Ответ:
wingluhova82
25.08.2020 19:27
CLSINPUT NDIM A(N)FOR i = 1 TO N  A(i) = INT(RND * 100)NEXT iFOR i = 1 TO N  FOR j = 1 TO N    IF A(i) > A(j) THEN SWAP A(i), A(j)  NEXT jNEXT iFOR i = 1 TO N  PRINT A(i);NEXT i
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота