tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вмассив на пятое место вставить
Вмассив на пятое место вставить элемент, равный сумме первых пяти элементов.
мик271
3 27.05.2019 18:00
0
Ответы
lexa123assasin
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Аделина2201
19.10.2021 10:15
1)В числовой последовательности из N произвольных целых чисел найти количество простых чисел 2)Фотоязык СНУЖНО ПОСТРОИТЬ ДВЕ БЛОК-СХЕМЫ...
16120000
19.10.2021 10:13
запрашивает с клавиатуры три целых числа и выводит на экран сумму данных чисел в прямом и обратном порядке C++...
zox229
12.07.2019 11:20
Что такое программное обеспечение компьютера какова его роль...
mila17111
17.08.2019 17:50
A: =12 if a div 2 =6 b: = a mod 5 else b: =a div 3; write (a-b); ответы: 1)2 2)8 3)12 4)10...
wellbiss
06.06.2019 04:00
Срешением , заранее ! информация о футболистах вводиться также, как и для ниже (сначала n, потом n строк с данными). вывести фамилию и имя футболиста, забившего наибольшее...
milinamonid
06.06.2019 04:00
Дана строка s. замените все группы стоящих рядом точек многоточием....
камусик2004
06.06.2019 04:00
Решите на паскале . найти площади n-треугольников, для каждого из которых известны длины сторон. n-ввести с клавиатуры, использовать процедуду, для вычисления площади треугольника...
eledzheev
14.04.2021 11:05
1. Каково назначение платформ МООС? 2. В чем разница между cМООС и хМООС?3. Взимается ли плата за обучение и сертификацию на платформах MOOC?4. Как организованы курсы, основанные...
Nazrin24
14.04.2021 11:06
Паскаль! Придумать программу используя оператора Goto и массив в 1 программе,программа должна быть интересная...
Hkolnik32
16.05.2020 22:50
с заданием по информатике.Заранее Эх_если_б_хто...
Популярные вопросы
Знайдіть площу паралелограма ABCD, якщо AB = 6 см, DN = 4 см....
1
Чи вистачить 150л кисню (н.у.) для спалювання метану кількістю речовини...
2
Невеликий твір на тему діяльність литовських князів з династії гедиміновичів...
3
Как в Паскале показываются логические функции? Нужно указать для каждого...
3
При нагріванні етанолу з бромоводнем утворилося 218 г брометану. Яка маса...
3
1-Тапсырма. Етістікті есімшеге айналдырыңыз. Сөйлем құрастырыңыз. Оқу Ойнау...
3
Написати композицію твору Скляний равлик это многим, вам поставят много...
2
Насіння голонасінних розповсюджується за до а)води б) вітру в) комах г)...
1
При припусканні амоніаку через трубку з розжареним Cu(2)O утворюється металічна...
1
побудови, знайдіть координати точки перетину графіка функції y=1,5x-6 з...
2
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.