1. Информатика
  2. Напишите решение в виде

Напишите решение в виде рпограммы на языке pascal вводится последовательность из n натуральных чисел, найти сумму всех отрицательных

Дарина15746 Дарина15746    1   31.08.2019 15:30    0

Ответы
DedMazaj DedMazaj  06.10.2020 08:11
Program;
var a,n,i,sum:integer;
sum:=0;
Begin
for i:=1 to n do
begin;
read(a);
if (a<0) then
sum:=sum+a;
end;
writeln(sum);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
aika194 aika194  26.02.2022 13:08
Нужно в excel решить задачу. Чтобы всё работало. Решить в excel....
toli4ka1337 toli4ka1337  26.02.2022 13:14
1. Скласти програму для обчислення виразу. 2. Використати мову програмування Python. как можно скорее...
maryamromanenko1294 maryamromanenko1294  26.02.2022 13:42
Массивы в паскале Каждый элемент массива а1 (10 элементов) формируется по формуле: x*i, где x каждый раз случайное число в диапазоне от -5 до +5, i - порядковый номер элемента массива....
какатус какатус  26.02.2022 13:45
1. Найти номер наименьшего элемента в массиве А, состоящего из 15 случайных целых чисел на интервале [-20, 25]. Некий злоумышленник перепутал строки программы. Исправить ошибки и записать...
rop12341234 rop12341234  20.01.2021 16:49
Какую выбрать тему по информатики для проекта, где много информации и которую легче сделать...
NIKESHNELY NIKESHNELY  01.04.2019 17:00
2)постройте табл истинности для выражений 1.a стрелочка ¬b 2.a стрелочка b стрелочка avb 3. a стрелочка b стрелочка ¬ c^¬a...
ЛяЛлля ЛяЛлля  01.04.2019 16:05
Язык программирования си ! необходимо написать программу, в которой динамические массивы и обрабатываются в соответствии с . программа должна выполнять следующие функции: 1. введение...
covepoxamu covepoxamu  11.06.2019 06:40
Выразить 3.5 мегобайт в байты потом в биты. 2048 гигобайта выразить в мегобайты. 512 килобайт выразить в мегобайты...
tebnev02 tebnev02  13.09.2019 03:50
Сделать в програме pascalabc if2 для исполнителя робота...
vikadmitrieva5 vikadmitrieva5  18.05.2021 14:57
2. «Театр – өмірлік сұрақтарға шешім табатын орын», – деген екен А.И.Герцен. Сіз бұл пікірмен келісесіз бе? 150-170-сөз​...

Популярные вопросы