tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив, состоящий из 10
Дан массив, состоящий из 10 элементов. заполнить массив случайными числами от -100 до 100 и подсчитать сумму отрицательных элементов массива. !
Takashu69
2 19.06.2019 02:00
1
Ответы
Stesha678975425789
15.07.2020 13:22
Const N=10;
var A:array[1..N] of integer;
i,sum:integer;
begin
for i:=1 to N do begin
A[i]:=random(-100,100);
write(A[i],' ');
end;
for i:=1 to N do
if A[i]<0 then sum:=sum+A[i];
write(' ',sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
PolinaSukova2
22.12.2020 06:29
Запишите функцию в ячейку С8, которая находит среднее значение ячеек А8 и В8. ...
koren27
22.12.2020 06:30
Какие символы содержит таблица кодирования Unicode?...
Lolkekcheburecks
14.04.2021 16:07
Написати програму, що складається з двох списків Listbox. У першому буде перелік предметів зананий програмою. Другий список порожній, нехай це буде шкільне приладдя. Високий рівень...
RetoGero
14.04.2021 16:06
(это не по учебе). Этому уже 3 дня, я никак не могу взаимодействовать с правой частью рабочего стола. Разве что только × нажимать. И это не только с рабочим столом. В какую бу я...
alfiea7
20.11.2021 04:37
Як кодуються аудіо- та відеодані?...
Батаева095
20.11.2021 04:39
Упростите логические выражения: (во вложении)...
alisheralisher2
13.03.2019 13:40
1.напишите шаблоны, с которых можно выделить: а) все файлы,имя которых начинаеться с букв da ,а расширение состоит из одного символа; б) все файлы, имя которых состоит не более чем...
Vladisimus
13.03.2019 13:40
При простой перестановки букв найдите зашифрованное слово зялогатиамицир...
ssssss22
13.03.2019 13:40
Клавиша получение символов, расположенных вместе с цифровыми в верхнем ряду клавиатуры...
datskivvera
23.09.2019 12:14
N3 составь цепочки а- из одной жёлтой треугольной бусины; б- из двух зелёных бусин квадратной и круглой формы в- из жёлтой квадратной и синей треугольной бусин; г- из красной квадратной...
Популярные вопросы
Фрагмент днк имеет следующий нуклеотидный состав: таггаатцтцгаацгтцгагг напишите...
1
81-54: 9*4+2=14 как поставить скобки чтоб решение было верным...
2
(36√12)2 найдите значение выражения...
3
Втреугольнике авс ав=вс=5, ас=6.в него вписана окружность с центром о. найдите...
2
Щоб зробити сплав для спаювання жерстяних виробів узяли 162 грамів свинцю а олова...
3
А3. переваривание крахмала в организме человека начинается в 1) желудке 2) тонкой...
3
Как сделать разбор часть речи слова солнышка? подскажите!...
1
А)17*(0,6-x)=3,4 б)5x+2,3=3,8 в) 5x+3x-1,3=1,1 г) (x+0,3): 7=0,21...
3
Сочинение по 5 класс добро и зло в сказках андресена...
1
Решить : 0.27-1 1\3 : 8\9 какой ответ если можно то !...
2
var A:array[1..N] of integer;
i,sum:integer;
begin
for i:=1 to N do begin
A[i]:=random(-100,100);
write(A[i],' ');
end;
for i:=1 to N do
if A[i]<0 then sum:=sum+A[i];
write(' ',sum);
end.