Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
kagdhs
15.12.2021 05:52 •
Информатика
Составьте программу заполнения массива а[1..10] нечетными числами: индексы элемента 1 2 3 4 5 6 7 8 9 10 значение элемента 1 3 5 7 9 11 13 15 17 19
Показать ответ
Ответ:
sofyashevtsova
21.06.2020 15:39
var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=2*i-1;
write(a[i]:3);
end;
end.
0,0
(0 оценок)
Ответ:
Ludacris66
21.06.2020 15:39
Program mas;
var a:array[1..10] of integer;
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
begin
a[i]:=p;
p:=p+2;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
stacezoloto
06.09.2021 01:38
Что не входит в виды информации по восприятия? зрительная звуковая обонятельная нервная...
aselduishenova
12.05.2022 21:26
Написать на псевдокоде алгоритм нахождения квадратного уравнения через дискриминант...
V73663
28.03.2021 04:42
Решите файнворд. Тема: информатика 7 классВ таблице змейкой размещены четыре слова, которые связаны с темой урока (их можно читать по горизонтали и вертикали, но не...
jykov2000
21.06.2022 03:51
Условие Напишите программу, которая определяет, попадает ли заданная точка в заштрихованную область. Граничные точки входят в область. Формат входных данных Вводится...
настя7589
29.05.2022 15:16
Вкинозале 32 рядов, в каждом ряду 16 мест. какое количество информации несет сообщение о том, что вам купили билет на 7 ряд 5 место?...
Никита1Рыдченко
06.05.2020 05:56
Здравствуйте сделать казахский язык ...
sonyaunicorn1
06.05.2020 05:56
основные земледельческие районы страны...
КеК5169
26.04.2023 06:52
Тиң киҫәктәргә дөйөмләштереүсе һүҙҙәр табып, һөйләмдәр уйлап яҙығыҙ. Тейешле тыныш билдәләрен ҡуйығыҙ һәм һөйләмдәрегеҙҙе дөрөҫ интонация менән уҡырға өйрәнегеҙ....
Анелька0
26.04.2023 06:52
ВТОРОЙ И ТРЕТИЙ СТОЛБИК...
limka5180
26.04.2023 06:52
1027. При пересечении двух прямых один из полученных углов равен: 1) 75; 2) 120°. Найдите градусные меры остальных углов. Бысстро...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=2*i-1;
write(a[i]:3);
end;
end.
var a:array[1..10] of integer;
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
begin
a[i]:=p;
p:=p+2;
end;
end.