Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

составьте программу, которая формирует массив, содержащий 16 случайных чисел, принадлежащих промежутку [-2;3], и подсчитывает сумму отрицательных

5-9 класс

чисел.вывод в строку через запятую

Tispun 07 сент. 2014 г., 1:07:20 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Juliay2
07 сент. 2014 г., 3:10:03 (9 лет назад)

Program Program1;
var
i,sum:integer;
A: array [1..16] of integer;
begin
randomize;
for i:=1 to 16 do
begin
a[i]:=random(6)-2;
write(a[i],', ');
end;
sum:=0;
for i:=1 to 16 do
if a[i]<0 then sum:=sum+a[i];
writeln('Сумма отрицательных чисел равна',sum);
end.

Ответить

Другие вопросы из категории

Задача 2 балла

[Больше-меньше]

Дядя Федор решил учить Шарика математике. Но Шарик был умным псом и простые примеры его не устраивали, тогда Дядя Федор усложнил задачу и записал три неравенства в таком виде:

1011112 + 2308 # 2334 – 138 + 9816
1618 – 7116 + 10004 # 11110012 – 718
1111112 – 118 + 1F16 # 3616 + 3214
Символ # обозначает один из трех знаков сравнения – больше, меньше или равно.

Помоги Шарику понять, в каком из неравенств, какой знак сравнения скрывается за символом #. В ответе запиши через пробел значения знаков сравнения в порядке возрастания номеров неравенств, следующим образом:

Если в неравенстве стоит знак «меньше», то напиши букву «М».

Если в неравенстве стоит знак «больше», то напиши букву «Б».

Если в неравенстве стоит знак «равно», то напиши букву «Р».

Читайте также

Составьте программу, которая формирует массив, содержащий 16 случайных вещественных чисел, принадлежащих промежутку [-2;3] и подсчитывает сумму

отрицательных чисел. Вывод в столбец с двумя десятичными знаками. Только Паскаль ABC!



Вы находитесь на странице вопроса "составьте программу, которая формирует массив, содержащий 16 случайных чисел, принадлежащих промежутку [-2;3], и подсчитывает сумму отрицательных", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.