Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
olga88888888888888
25.05.2022 07:36 •
Информатика
Составьте программу заполнения одномерного массива a(n) пятью первыми членами последовательности{an} с общим членом an=(n+1)^2
Показать ответ
Ответ:
morcowqwerty
03.10.2020 11:03
Const n = 5;
var a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do begin
a[i]:=sqr(i+1); writeln(a[i]);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kolyapauk2016p08ax4
30.01.2023 21:04
Укажите, сколько раз выполнится тело цикла с заданным заголовком: FOR i = 5 DOWNTO 1 DO...
tokmachevasvp01bjy
05.02.2021 12:05
Составьте программу для вычисление функции y=1 /x-5...
VeshkinRuslan
19.11.2021 22:10
Какое число будет напечатано, после выполнения фрагмента программы? s := 100; for i =1 to 5 do s := s-10; write (s);...
LiiiiiiV
23.08.2022 12:11
Завдання 2. Тренажер.Сплануй і розроби проект Тренажер у середовищі Скретч, у якому реалізуй модель руху автомобіля на трасі, що регулюється світлофорами та якою рухаються...
Люда0001
03.06.2021 11:15
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходят по очереди, первый ход делает Петя. За один ход игрок может а) добавить...
ArinaShakie10
23.01.2022 02:30
вогнать программу в цикл nom = int(input( Щоб ви хотіли купити? Пепсі 1 , Кола 2, Фанта 3 )) if nom == 1 : print( Пепсі ) elif nom == 2 : print ( Кола ) elif nom == 3 :...
TataSkate
13.05.2023 15:27
ДОКЛАД ПО ИНФОРМАТИКТИ НА ТЕМУ КАМЬПЮТЕР КАК УНЕВЕРСАЛЬНОЕ УСТРОЙСТВО ПО ОБРАБОДКИ ДАННЫХ...
max20170102
21.11.2022 03:02
Звук длительностью 2 минуты оцифрован с частотой 11000 гц. глубина кодирования - 22 бита. определите размер полученного файла в мбайтах. результат округлите до двух цифр...
margusqw
17.03.2022 04:52
Как по-другому называется группа блоков? 1- Блок цветов 2-Цветовая палитра 3- Палитра блоков 4 Набор блоков...
MaxHelpMelol
08.05.2023 07:02
с информатикой (8 класс программирование в PaskalABC)1.Строчные английские буквы расположены в кодовой таблице символов в порядке своего следования в алфавите и имеют коды...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do begin
a[i]:=sqr(i+1); writeln(a[i]);
end;
end.