tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано число n. заполнить массив
Дано число n. заполнить массив из n элементов, каждый элемент равен выражению = (n + текущий индекс элемента в массиве) .вывести массив на экран. паскаль.
gidra2281337
3 16.08.2019 10:20
0
Ответы
bonchuk2009
04.10.2020 22:42
// PascalABC.NET 3.2, сборка 1362 от 14.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('N=');
var a:=ArrGen(n,n+1,x->x+1); a.Println;
end.
Пример
N= 13
14 15 16 17 18 19 20 21 22 23 24 25 26
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
yulyaanisimova2
02.02.2022 07:25
На вход программы поступает неизвестное количество целых чисел, ввод заканчивается нулём. Напишите программу, которая находит минимальное и максимальное среди полученных...
Sasci
18.02.2021 11:02
По клеткам как шахматная фигура конь ...
playerkeks
18.02.2021 11:01
Сравните вычисления в калькуляторе и вычисления в Python.Проанализируйте их сходства и различия очень нужно, буду благодарна....
kassaalevtina
25.07.2019 11:40
Плез, буду признателен. паскаль. напечатать в обратном порядке кубы целых чисел от 10 до b (значение b вводится с клавиатуры, b 10). значение b изменяется от 22 до 10...
galyaninaalena
25.07.2019 11:40
Используя функцию найти все автоморфные числа из промежутка от a до b. автоморфные числа-когда квадрат это числа оканчивается на само себя.например 6^2=36(заканчивается на...
anyyy001
24.04.2020 16:04
1 . Определите значение переменной Y после выполнения следующего фрагмента программы Y:=0; i:=7; While i 1 do begin Y:=Y+i div2; i:=i – 1; end; 2. Определите значение переменной...
ера2009
17.08.2019 14:10
3почему при многократной обработке растений повышается устойчивость к ним насекомых вредителей? объясните это явление с позиций эволюционного учения и определите форму отбора....
dmitriyslesarev
17.08.2019 14:10
Вычисли площадь ромба, если его сторона равна 8 дм, а проведённая к ней высота равна 5 дм....
русскийязык149
17.08.2019 14:10
Найдите неизвестныц член пропорции 0,31/4,8=1,24/x...
idrisovbulat
17.08.2019 14:10
Докажите, что на промежутке [0; п] данное уравнение sinx*tgx+1=sinx+tgx имеет единственный корень и найдите его....
Популярные вопросы
Парламент против короля. революция в . ход военных действий. 100...
2
Решить примеры ,3 целых 3/4+2 целых 4/7 . 6 целых 7/12+(5 целых 3/40-4...
3
5предложений о моем любимом фильме пираты карибского моря...
3
Розбери за будовою слова взаємозв язок,верховіччя,криголам...
3
Веритроцитах крові, у клітинах ситоподібних трубок рослин , відсутні ядра....
1
Два сложных предложение и два с двумя основами на тему школа...
3
На стороне ad параллелограмма abcd взята точка m так, что dm=dc a)докажите,...
2
На машину погрузили m ящиков. в каждом ящике было 70 коробок, а в каждой...
3
Одна сторона прямоугольника равна 3 целых 3/4 см а другая на 3,25 см найдите...
3
Вкнижке-головоломке антона тилипмана «зубавка» во многих словах перепутались...
2
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('N=');
var a:=ArrGen(n,n+1,x->x+1); a.Println;
end.
Пример
N= 13
14 15 16 17 18 19 20 21 22 23 24 25 26