Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
belka20055
03.05.2022 13:03 •
Информатика
Вмассив на пятое место вставить элемент, равный сумме первых пяти элементов.
Показать ответ
Ответ:
simonenkoeliza
24.06.2020 20:09
Program chik;
var a:array[1..1000]of integer;
n,i,s:integer;
begin
read(n);
for i:=1 to n do
begin
read(a[i]);
end;
s:=0;
for i:=1 to 5 do
begin
s:=s+a[i];
end;
a[5]:=s;
for i:=1 to n do
begin
write(a[i],' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
14света14
23.02.2021 02:05
Напишите программу на Qbasic для вычисления выражения: cos^2x+ctg4x при x=2....
ЧОПОЧНИК
23.12.2020 17:34
Модем передающий данные со скоростью 10800 бит/с...
irochkakarpenkp0bint
07.12.2022 04:34
Как изобразить с кругов эйлера: тигры | лев & кошки...
ViktorVivat
03.12.2021 02:40
Написати програму, яка знаходить значення виразу: n=(k-4g+3)/(g-1), де у та k потрібно ввести зклавіатури, при цьому g та k- цілі числа. Потрібноперевірити ОДЗ,...
марья49
25.01.2022 22:50
Информационный объём сообщения 4 килобайта. Алфавит, символами которого записано это сообщение содержит 256 символов. Сколько символов в сообщении? сделать с решением...
kpnkipm
28.07.2020 00:44
Что такое электронные словари? ...
Appledog
04.04.2021 14:00
дан массив. все его элементы: а) уменьшить на 20; б) умножить на последний элемент; в) увеличить на число в. pascal (через константу)...
shishkinaviolet
04.10.2021 04:43
Используя цикл while, выведите на экран для числа 2 его степени от 0 до 20. Возведение в степень в Python обозначается как **. Фрагмент вывода: ... 32 64 128 256...
Antik3006
20.04.2022 05:16
Разобрать слова по составу : дни пример разбора: встреча - имя существительное, обозначает предмет, изменяется по падежам, не изменяется по и временам н.ф - встреча...
Dormin
20.04.2022 05:16
Які параметри газу необхідно виміряти для експериментальної перевірки закону, що справджується для ізотермічного процесу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:array[1..1000]of integer;
n,i,s:integer;
begin
read(n);
for i:=1 to n do
begin
read(a[i]);
end;
s:=0;
for i:=1 to 5 do
begin
s:=s+a[i];
end;
a[5]:=s;
for i:=1 to n do
begin
write(a[i],' ');
end;
end.