Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
25Виктория03
20.04.2021 11:07 •
Информатика
Дана последовательность чисел а длины n. требуется вывести в обратном порядке
Показать ответ
Ответ:
bikaddff
04.10.2020 19:51
Var
a: array[1..100] of integer;
n: integer;
i: byte;
begin
randomize;
write ('Введите N: ');
readln (n);
for i:=1 to n do begin
a[i]:=random(101);
write (a[i]:5);
end;
writeln;
for i:=n downto 1 do
write (a[i]:5);
end.
Результат:
Введите N: 10
37 48 9 48 68 5 67 100 67 20
20 67 100 67 5 68 48 9 48 37
0,0
(0 оценок)
Популярные вопросы: Информатика
svetlana485
09.11.2022 10:22
1. векторное изображение формируется * a) из объектов b) из точек c) из рисунков d) из пикселей 2. при сканировании изображения будет получено * a) векторное изображение...
mak57
21.06.2020 20:48
Ознакомся с порядком алгоритма и внеси значения переменных в пустые ячейки...
sashuljalapulja
20.06.2022 03:55
Можно ли расписание уроков считать информационными моделями...
stich3918
25.04.2020 13:33
Нужно сдавать работы по информатике, но у меня нет времени чтобы делать их. работа если что это компьютерный практикум в конце учебника (информатика 6 класс босова)....
GoogliCC
30.04.2020 06:41
Для какого из перечисленых ниже названий животных ложное высказывание ( последняя буква гласная или вторая согласная ) или третья буква согласная 1 василиск 2 ирбис 3...
long6
05.02.2021 16:55
Укого то есть ответы на соры можете отправить! ?...
Panda9881
07.11.2022 12:25
Qbasic 64. необходимо: 1. сделать яблоню2. анимацию падения яблок...
Ma4oMatoy
27.04.2021 10:37
Вычисли радиус окружности, описанной около треугольника, если один из его углов равен 45°, а противолежащая ему сторона равна 42 см. (Если в ответе корней нет, то под...
bosyakostya
27.04.2021 10:37
Міь мажор, в ній побудувати головні тризвуки ладу ( Т53, S53, Д53 ), тритони (зб4-на 4 ст., зм5- на 7ст), Д7 – все з розв язанням. Побудувати в Міь мажорі обернення тонічного...
bonipasol1
19.01.2021 08:33
Для какого из регионов Африки характерен влажный климат с большим количеством осадков, непроходимые джунгли, с живущими в них пигмеями, разнообразный животный мир и наличие...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a: array[1..100] of integer;
n: integer;
i: byte;
begin
randomize;
write ('Введите N: ');
readln (n);
for i:=1 to n do begin
a[i]:=random(101);
write (a[i]:5);
end;
writeln;
for i:=n downto 1 do
write (a[i]:5);
end.
Результат:
Введите N: 10
37 48 9 48 68 5 67 100 67 20
20 67 100 67 5 68 48 9 48 37