Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
liubovbalan
29.11.2020 19:34 •
Информатика
По информатике написать программу,осуществляющую ввод значений массива с клавиатуры(10 элементов) и вывод их в строчку.
Показать ответ
Ответ:
Milediteul
03.10.2020 11:06
Программа:
const n=10;
var a:array[1..n] of integer;
i:integer;
begin
writeln('Введите массив:');
for i:=1 to n do
begin
write('a[',i,'] = ');
readln(a[i]);
end;
writeln;
for i:=1 to n do write(a[i]:4);
writeln;
end.
Пример:
Введите массив:
a[1] = 15
a[2] = -8
a[3] = 24
a[4] = -31
a[5] = 45
a[6] = -61
a[7] = 72
a[8] = 19
a[9] = 55
a[10] = -28
15 -8 24 -31 45 -61 72 19 55 -28
0,0
(0 оценок)
Популярные вопросы: Информатика
izmaylova77
04.05.2021 03:17
Придумать команду и девиз на тему икт или информатика заранее кто будет чушь писать обращусь к поддержки заранее ставлю 34...
Kirito505
14.12.2020 18:42
Выражение 3(a1 + b1) : 5(2b1 - 3a2), записанное в соответствии с правилами, принятыми в , в электронной таблице имеет вид: 1. 3*(a1 + b1) / (5*(2*b1 - 3*a2)) 2....
tarasov78
13.06.2020 06:03
Чтобы вывести на экран фразу Я студент первого курса! необходимо: write (‘Я студент первого курса!’); writeln (Я студент первого курса!); readln (‘Я студент первого...
jokernastyabotovt8qe
22.11.2021 19:52
Является ли условным оператором следующая последовательность символов? if x 13 then y : = x + 13 else y : = x − 13...
Arkadysh
09.02.2021 02:52
решить задачу на языке C# . Вычислить среднее арифметическое максимального и минимального элементов массива. Эта же задача решенная на языке СИ: #include stdio.h...
Erantpay22
14.08.2022 13:49
Определить, насколько увеличится время передачи данных в сети с коммутацией пакетов по сравнению с сетью с коммутацией каналов, согласно исходным данным: общий объём...
hasan095mudrec
27.12.2021 23:10
Айдар зашел на соц страничку Тимура. И скопировал несколько личных фотографий, сделав свои комментарии под фотографиями передал копии своим друзьям. Правильно ли...
орп21
07.03.2023 00:21
Диск имеет память объемом в 1,83 Mб. Определите, сколько раз на нем можно записать сообщение «Навруз – праздник весны» в 8-битной кодировке? (не считая кавычек ...
nbibyf2005
16.01.2020 13:56
Сходство и различие между битвами на куликовом поле и на косовом поле. !...
elmaz5
16.01.2020 13:56
Миллионы людей на нашей планете ликовали, узнав о спуске советским союзом в 1957 году первого искусственного спутника земли...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const n=10;
var a:array[1..n] of integer;
i:integer;
begin
writeln('Введите массив:');
for i:=1 to n do
begin
write('a[',i,'] = ');
readln(a[i]);
end;
writeln;
for i:=1 to n do write(a[i]:4);
writeln;
end.
Пример:
Введите массив:
a[1] = 15
a[2] = -8
a[3] = 24
a[4] = -31
a[5] = 45
a[6] = -61
a[7] = 72
a[8] = 19
a[9] = 55
a[10] = -28
15 -8 24 -31 45 -61 72 19 55 -28