Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Дрындель
29.05.2023 22:51 •
Информатика
Дана последовательность чисел а длины n. требуется вывести в обратном порядке
Ответ:
Gogogogh
07.10.2020 03:09
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqReal('Вводите последовательность',ReadInteger('N=')).Reverse.Println
end.
Пример
N= 10
Вводите последовательность 5 9 3.15 -6.7 0 12 100 35 0.03 1e-20
1E-20 0.03 35 100 12 0 -6.7 3.15 9 5
0,0
(0 оценок)
Популярные вопросы: Информатика
An0441
07.08.2021 01:30
1. Скласти програму для обчислення суми чиселмасиву, які більші за 5....
dianapodosenova
13.07.2021 14:10
Ниже в табличной форме представлены сведения о книгах школьной библиотеки. Сколько записей в данном фрагменте удовлетворяют условию (Иллюстратор = «Сутеев») ИЛИ (Год_издания...
googlman
28.12.2020 19:18
с формулой таблицы. A1- 1 А3- 5 =СРЗНАЧ(A1:A3)...
МухаВж
20.07.2021 12:12
Люди! с этой трудной задачей...
Noltee
04.11.2022 21:58
Что делать если тебя окружили предатели...
gmejenny
04.11.2020 13:13
Составить блок-схему для ввода с клавиатуры своего имени (программа должна попросить это у пользователя) и последующего вывода на экран «Привет, [имя]» (Имя соответственно...
vcurakina
17.11.2021 12:09
Запусти Паскаль и введи программу: program x1; var a,b,c:integer; begin a:=−16; b:=abs(a); writeln( abs(−16)= ,b); c:=sqr(b); writeln( sqr(b)= ,c); c:=sqr(b+b); writeln(...
karvinatatiana
24.03.2021 22:25
Как в Excel записать если 0 =x =1 то y=-1 ??...
BobrLite
23.01.2023 04:35
3 вопроса на футбольную тематику...
Yxcvbnm3
23.01.2023 04:35
Тело движется по закону s=10t+18t^2 - 2t^3. Найти значение ускорения в момент времени 2с...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqReal('Вводите последовательность',ReadInteger('N=')).Reverse.Println
end.
Пример
N= 10
Вводите последовательность 5 9 3.15 -6.7 0 12 100 35 0.03 1e-20
1E-20 0.03 35 100 12 0 -6.7 3.15 9 5