сервис вопросов и ответовдан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-100;100] найти сумму положительных элементов, значения
10-11 класс|
|
которых меньше 10.
Pascal
YuluanaV345
13 марта 2015 г., 9:02:21 (9 лет назад)
Valieva1107
13 марта 2015 г., 10:18:28 (9 лет назад)
var
mas:array[1..999] of integer;
n,sum:integer;
begin
sum:=0;
randomize;
readln(n);
for i:=1 to n do
begin
mas[i]:=random(201)-100;
write(mas[i],' ');
end;
writeln;
for i:=1 to n do
if (mas[i]>0) AND (mas[i]<10) then
sum:=sum+mas[i];
writeln(sum);
end.
Ответить
Другие вопросы из категории
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Напишите программу, которая подсчитывает
количество элементов массива равных макс. среди двухзначных чисел. Если ни одного такого числа нет, нужно вывести сообщение об этом.
КАКАЯ ИЗ ДАННЫХ ЛИНИЙ СВЯЗИ СЧИТАЕТСЯ "СУПЕРМАГИСТРАЛЬЮ" СИСТЕМ СВЯЗИ, ПОСКОЛЬКУ ОБЛАДАЕТ ОЧЕНЬ БОЛЬШОЙ ИНФОРМАЦИОННОЙ ПРОПУСКНОЙ СПОСОБНОСТЬЮ:
1)волоконно-оптические линии
2)радиорелейные линии
3)телефонные линии
4)проводные линии
Читайте также
Дан массив целых чисел из 15 элементов, заполненный случайным образом числами из промежутка [ -20, 50 ].
Удалить из него все элементы, в записи которых есть цифра 5.
Вставить число k после всех элементов, кратных своему номеру (k вводится с клавиатуры).
Поменять местами первый положительный и последний отрицательный элементы.
Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-10,20].
Найти номер первого отрицательного элемента, делящегося на 5 с остатком 2.напишите пожалуйста программу в лазарусе
Дан массив целых чисел из n
элементов, заполненный случайным образом числами из промежутка [-10,60]. Удалить из него все элементы, в
которых последняя цифра нечетная, а само число кратно 3.
Помогите пожалуйста решить в C# (Си шарп)
Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
Помогите пожалуйста!
массив целых чисел из 10 элементов заполнить случайным образом. упорядочить массив по возрастанию. подсчитать количество и произведение элементов массива, больших 20 и меньших 50, вывести полученный результат
Вы находитесь на странице вопроса "дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-100;100] найти сумму положительных элементов, значения", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.