tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Pascal вычислить сумму
Pascal вычислить сумму элементов массива заданной длины(array)
kiriukhina2007
1 01.07.2019 09:20
2
Ответы
AnitaGo
02.10.2020 17:17
Uses Crt;
const
m=1000;
var
a:array[1..m]of integer;
i,s,n:integer;
begin
clrscr;
writeln(' Введите длину массива');
readln(n);
Writeln('Введите массив через пробел');
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
writeln(s);
readkey;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
suleimanzhasulan
21.05.2020 14:42
Выберите документ который является алгоритмома) Правила техники безопасностиб) Расписание уроковв) Статья в газетег) Инструкция по получению денег в банкомате ...
sashdjfjfh
21.05.2020 14:42
Які з наведених блоків мають відношення до циклу?...
BelkaNext
29.04.2020 15:46
Выбери правильный вариант ответа Основные устройства компьютера а) наушники б) монитор в) принтер г) системный блок может несколько вариантов...
bilayenot
29.04.2020 15:46
В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций...
megachiglakov
22.08.2019 04:00
Запишите определения схема, чертежи, дерево, граф...
Маминбандит138
22.08.2019 04:00
50 ! напишите программу. в первой строке вводится натуральное чило n вывести на экран - произведение нечетных цифр числа (считается, что хотя бы одна нечетная цифра в числе...
baumwolle
11.12.2021 13:53
In a network DB the relationship among data is organized in ... form. a] Many-to-many [a] Many-to-one [a] One-to-many [a] One-to-one [a] Sequential...
Еленаелец77
11.12.2021 13:53
Перегляньте сторінку сайту Національної бібліотеки України для дітей (chl.kiev.ua). Визначте та запишіть у зошит, скільки блоків навігації розміще- нонасторінці,якоготипуконтент,які....
nik180208
15.05.2020 15:54
Нужно составить на паскале...
kononovadm
24.10.2021 20:26
Открыть чат Сила души. Различие падежей имён существительных. Урок 2 Укажи, каким призывом можно закончить монолог на тему «Совершай добрые поступки». Давайте учитывать...
Популярные вопросы
Решительно дроби 9/10 - 3/10 1-7/8 1/4 - 1/12 5/10 - 5/100 5/6 - 2/7...
1
Перед кем я несу ответственность за свое образование...
3
Запиши начальную форму данных глаголов.внимательно следи за тем какой...
3
Кто из известных вам править ей азиатских государств были современниками...
1
Заполни таблицу. сторона квадрата 3 см ? дм ? м. периметр квадрата ?...
2
Опредилите эквивалент веществ nа2со3+hcl...
1
Какая схемы будет у этого предложения: когда пришла весна,поднялся в...
1
Высота отанкинской телебашни вместе со шпилем примерно 540 м. посмотри...
3
Что или кто может излечить душу печорина...
2
Найдите 5 предложений из сказки или рассказа с неодушевленными и одушевленными...
1
const
m=1000;
var
a:array[1..m]of integer;
i,s,n:integer;
begin
clrscr;
writeln(' Введите длину массива');
readln(n);
Writeln('Введите массив через пробел');
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
writeln(s);
readkey;
end.