сервис вопросов и ответоввычислить сумму положительных и произведение отрицательных элементов массива написать программу в паскале
5-9 класс|
|
Milkis0
25 мая 2014 г., 12:54:08 (9 лет назад)
Egorc9
25 мая 2014 г., 15:48:02 (9 лет назад)
var a: array [1..10] of integer;
s,s1,i: integer;
begin
s:=0;
s1:=1;
for i:=1 to 10 do
begin
readln(a[i]);
if a[i]>0 then s:=s+a[i];
if a[i]<0 then s1:=s1*a[i];
end;
writeln('Сумма: ',s,', произведение: ',s1);
end.
Ответить
Другие вопросы из категории
Пользователь компьютера, хорошо владеющий навыками ввода информации с клавиатуры, может вводить в минуту 100 знаков. Какое количество информации может в
вести пользователь в компьютер за одну минуту в кодировке Windows? В кодировке Unicode?
Составьте программу, которая заполняет массив а [1..10] случайными целыми числами в диапозоне от 1 до 10, затем преобразовывает его, увеличивая все
элементы с четными значениями на 1. Если элементы с четными значениями отсутствуют, оставить массим без изменений.
Привет ребят!Помогите мне с блок-схемой(алгоритмом).Ума не приложу,что делать:( Сама задача: -- -3,если х<-3 у=<|
x, если -3=<x<0
-- 4x,если х>4
--
<| - это фигурная скобка
--
Отдаю все пкт,что у меня есть,мне не жалко:)
Блин,что никто не знает?(((
Ученик рассказал, что маме 14 лет, папе 26 лет, ему (сыну) 9 лет. Сумма возрастов мамы и папы – 48 лет. Какую систему счисления использовал ученик
? Вычислить, сколько лет маме, папе и сыну в десятичной системе счисления.
Читайте также
1) Удвоить все элементы массива. 2)Найти сумму элементов двух массивов одинаковой размерности. 4) Найти Минимальные элементы массива и
его индекс.
5) Найти максимальные элементы среди положительных элементов массива 6) Найти максимальные элементы среди отрицательных элементов массива
7) Определить количество максимальных элементов массива
P.S Ребят, все в паскале...заранее спасибо=*
Массив В задан случайным образом а) подсчитать сумму элементов массива, меньших своего номера; б) подсчитать сумму элементов массива, стоящих на четных
местах; в) подсчитать сумму отрицательных элементов массива; г) подсчитать сумму элементов массива, больших произвольного числа К. помогите, пожалуйста
Заполните массив с клавиатуры целыми числами и найдите сумму элементов массива с i1-го по i2-й (i1 и i2 вводить с клавиатуры).
Входные данные:
в первой строке целое число n (0 < n ≤ 100) - кол-во элементов в массиве и целые числа i1 и i2 (0 < i1, i2 ≤ 100). Во второй строке целые числа Х1, Х2,..,Хn разделенные пробелом (числа по модулю не превосходят 32000) - значения элементов массива.
Выходные данные:
сумма элементов массива c номерами от i1 до i2.
(Написать программу на Паскале)
1.Дан массив целых чисел, найти среднее арифметическое всех элементов массива.
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
Помогите решить, буду очень благодарен.
1. Дан массив, найти произведение отрицательных элементов массива.
2. Дан массив, заменить все отрицательные элементы массива их модулями
Вы находитесь на странице вопроса "вычислить сумму положительных и произведение отрицательных элементов массива написать программу в паскале", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.