Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Помогитепж111111111
09.12.2020 17:59 •
Информатика
Заполните массив из 10 элементов, в котором каждый элемент будет равен введенному числу с клавиатуры. const n=10; var a: array [1..n] of integer; i,x: integer; begin readln(x); for i: =1 to n do a[1]: = ; for i: =1 to n do write (a[i]: 6); end.
Ответ:
sotlen61Ang
15.09.2020 21:54
Const n=10;
var a:array [1..n] of integer;
i,x:integer;
begin
readln(x);
for i:=1 to n do
a[i]:=x;
for i:=1 to n do
write (a[i]:6);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
amwarawka
05.03.2020 07:36
которое из следующих определений характеризует слово из символов В) символ пробел С) символ дефиз Д) все...
73487Юлия14271
26.08.2020 08:13
Определите истинность/ложность утверждений (TRUE, FALSE)ниен1TRUEВекторныйредакторCorelDrawподдерживаетвекторные ирастровыеформаты файловTRUEОтсканированнуюфотографиюнельзя переделатьв...
Адриана1111111
16.06.2021 10:07
Написать программу на языке программирования Pascal с использованием условного оператора и цикла WHILE Задача: Вывести на экран кубы чисел от X до Y, которые с клавиатуры вводит...
УРОК000
24.11.2020 18:44
Как выделить рисунок на документе...
пороло1
15.11.2020 04:52
Задание 1 Необходимо письменно продолжить мысль: MicrosoftWord – это Шаблоны-образцы – это Основные функции MicrosoftWord – это Текстом является Задание 2 Постройте организационную...
k03a12345
10.07.2021 19:45
6 Моделирование процессов в электронных таблицах. Урок 1Верно ли утверждение, что модель - это представление реального или выдуманного объекта илипроцесса....
Rianariana2002
09.10.2021 13:12
Как переместить слайд в презентации? 1) Взять слайд и вместе переместить в другое место 2) выделить слайд, зажать левую клавишу мыши и перетащить слайд в нужное место 3) потянуть...
andrey440
18.11.2022 14:27
Какие инструменты можно использовать чтобы нарисовать модель фигуры шестигранника в 3D формате а. б...
анапияабдыганиева
25.09.2020 23:45
При форматировании слов изменяется... А) размер символов В) отступ абзаца С) расстояние между строками Д) все...
08760000
25.02.2023 10:05
Напишите программу, вычисляющую объём куба и площадь его полной поверхности, по введённому значению длины ребра. Sample Input 1: 25 Sample Output 1: Объем = 15625 Площадь полной...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a:array [1..n] of integer;
i,x:integer;
begin
readln(x);
for i:=1 to n do
a[i]:=x;
for i:=1 to n do
write (a[i]:6);
end.