tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Массив а вводится с клавиатуры.
Массив а вводится с клавиатуры. найти сумму его элементов. размер произвольный. паскаль
Raul020507
2 28.07.2019 04:50
8
Ответы
ushanoval
07.09.2020 21:29
Var
a: array[1..100] of integer;
i, n, s: integer;
begin
readln(n);
s := 0;
for i := 1 to n do
begin
Readln(a[i]);
s := s + a[i];
end;
writeln('s = ', s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
дада211
20.03.2021 13:33
Найти сумму всех чисел, которые оканчиваются на цифру 3 или 7 в диапазоне от 22 до...
ivanpanyushkin1
20.03.2021 13:48
У Вити есть несколько файлов в каком порядке они встанут если их сортировать по имени...
Лучік12
14.05.2020 12:48
ответьте на следующие во Чем различаются текстовые редакторы и текстовые процес2. Какие текстовые редакторы вы знаете?3. Какие текстовые процессоры Вы знаете?4. Каковы...
Aliiev19
14.05.2020 12:48
1.Напишите программу,в которой вычисляется диаметр круга по заданной площади круга. 2.Для двух произвольных вещественных чисел вычислить их разность,если их первое число...
steellore
14.05.2020 12:48
Программный код игры Футболист.Проанализируйте программный код игры. Объясните функцию каждого блока программы.(это 1 задание из СОР по информатике за раздел «Создание...
Никитонрпаачвпр
27.01.2021 15:55
ответьте на вопросы: • Как обозначается целый тип данных?Как обозначается вещественный тип данных?• Как обозначается строковый тип данных?• Какая команда отвечает за вывод...
KlarissaStet
27.01.2021 15:55
Что вы знаете о World Wide Web?...
Katia1717
27.01.2021 15:54
1. Создайте таблицу, содержащую приведенную ниже информацию. Определите ее тип. Имеются сведения о семи пациентах поликлиники. Трое из них – пенсионеры. Это Быков, возраст...
Дракон2323
27.01.2021 15:53
Що таке ботнет мережа і яки виконують загрози для користовача якщо потрапити до такої мережі?...
Znanija1821
25.05.2019 15:40
Дано: k=44100 i=16 бит t=3 мин 18 сек n=2 найти: i...
Популярные вопросы
5. The author’s favourite art is music and literature (True/False) 6....
2
САМОСТОЯТЕЛЬНАЯ РАБОТА 3Сравни. Будь внимателен.ам.5 дмNH2ч1532 ч. 33...
1
Постройте график функции y=kx если известно, что ему принадлежит точка...
2
Тапсырма. «Қара сөз» деген сөз тіркесін естігенде, ойларыңа не келеді?Диаграммаға...
2
Атапсырма Кетерілген басты мәселені анықтау мақсатында жұбыңызга сұрақ...
3
Деление на двузначное число 21,034 : 12 4,511 : 42 с объяснением!...
2
Task 3. Rewrite the sentences in the Passive Voice: 1. Marry is baking...
2
,с алгеброй. Очень ,нужно до завтра......
3
Вычислите, используя одну из формул сокращенного умножения: 172 – 34∙7+72...
2
А) Докажите, что треугольник HFE=треугольнику LHK. б) Найдите ,FE, если...
1
a: array[1..100] of integer;
i, n, s: integer;
begin
readln(n);
s := 0;
for i := 1 to n do
begin
Readln(a[i]);
s := s + a[i];
end;
writeln('s = ', s);
end.