сервис вопросов и ответовДан массив из 50 элементов. Найти произведение всех элементов.
5-9 класс|
|
Xamka
30 авг. 2014 г., 11:05:25 (9 лет назад)
Ильсаф01
30 авг. 2014 г., 13:32:53 (9 лет назад)
var
a: array [1..50] of integer;
l: longint;
begin
for l := 1 to 50 do
begin
a[l] := random(-5, 5);
write(a[l], ' ');
end;
l := 1;
writeln();
foreach k: integer in a do
l *= k;
writeln(l);
end.
Ответить
Другие вопросы из категории
Помогите Пожалуйста!! Срочно!!!Доступ к файлу doc.htm, находящемуся на сервере site.com, осуществляется по протоколу http.
Фрагменты адреса файла закодированы буквами от А до Ж. Запишите последовательность этих букв, кодирующую адрес указанного файла в сети Интернет.
A) site
Б) ://
B) doc
Г) /
Д) .htm
Е) .com
Ж) http
Решить задачу в Паскале.
С клавиатуры вводится время суток в часах (от 1 до 24). Необходимо составить программу, которая будет выводить на экран привествие согласно введенному времени.
Ввод:
1
Вывод:
Доброй ночи
Читайте также
1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
решить через паскаль через массивы)) 1.Дан одномерный массив из 10 элементов. Заменить все большие 7 члены массива числом 7. Найти количество
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
Пожалуйста решите:
Дан массив из 50 элементов. Гайти произведение всех элементов массива.(Pascal)
1. Имеется целочисленный массив, состоящий из 15 элементов: a) Найти сумму a[1] и a[7] элементов; b) Найти разность a[9] и a[3] элементов; c) Найти
среднее арифметическое всех элементов массива; d) Найти произведение всех элементов массива.
Вы находитесь на странице вопроса "Дан массив из 50 элементов. Найти произведение всех элементов.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.