Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
JULIA110
23.11.2021 15:45 •
Информатика
Заполните массив из 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.
Ответ:
ladykaden
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 оценок)
Популярные вопросы: Информатика
musalimovvlad
29.01.2020 09:44
Введите с клавиатуры n чисел.вывести на экран колечество чисел превосходящих первое число.я пишу- begin clrscr; k: =0; for i: =1 to n do begin write(введите число ); readln(n);...
anitamirzikkk
29.01.2020 09:44
Стаблицей! тип переменной название типа диапазон значений допустимые значения integer real char...
ОдиннидО
29.01.2020 09:44
Свободный объём оперативной памяти компьютера 640 кб . сколько страниц книги поместиться в ней, если на странице 16 строки по 64 символа в строке ( кодировка символов осуществляется...
aleksminaev
24.02.2021 16:46
1.составить программу нахождения суммы и произведение трех введенных с клавиатуры чисел. 2.найти приметр тропеции составить блок схему нахождение большего из четырех....
rran
24.02.2021 16:46
Придумать тему для реферата. 7й класс. тема не должна быть слишком простой(что такое компьютер) и не должна быть слишком сложной(ассоциативные правила)....
Karukart
05.11.2021 22:04
Что выведит программа, если a=5, b=3.#include using namespace std;int main(){int a, b, c;cin a;cin b;c = a * b;cout c...
valentinadeva2p0arnh
03.10.2022 09:46
(жаль тут материца нельзя меня соседи бесят они моргена на колонках слушают((()...
с1413а
28.11.2020 07:22
Составить программу замены местами цифр двухзначного числа -найдите...
Tanya31323
03.02.2023 06:50
7. Що можна закривати? а) очі; б) кватирку; в) зошит; г) воду....
яна7933
20.07.2021 13:47
«Жусан иісі» шығармасындағы ертегі айтатын балаертегілерінің бірін өз ойыңмен аяқта....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.