сервис вопросов и ответовНайти произведение всех ненулевых элементов массива D. Массив D(10). Ограничение D с нижним индексом i не равно 0 VBA
10-11 класс|
|
сашенька2007
25 дек. 2015 г., 16:59:59 (8 лет назад)
Serjio58
25 дек. 2015 г., 18:02:54 (8 лет назад)
Var d:array[1..10] of integer;
s,i:integer;
Begin
s:=1;
For i:=1 to 10 do
begin
readln(d[i]);
If d[i]<>0
Then S:=S*d[i];
end;
Writeln(S);
end.
Ответить
Другие вопросы из категории
На вокзале 2 платформы, у каждой из них стоит поезд. Девушка в справочном окне отвечает на все вопросы только «да» и «нет». За какое минимальное
число вопросов можно гарантированно узнать, в каком порядке отходят поезда?
Распишите решение!!!
Вопросы по информатике.
1.История развития языка Си,его достоинства.Особенности языка Си
2.Общие правила написания программы на языке Си,пример,комментарии.
3.Элементы языка Си, алфавит языка
4.Использование арифметических операций в Си, операция условие?
5.Константы,идентификаторы,ключевые слова языка Си, примеры
6.Базовые типы данных и модификаторы языка Си
7.Объявление переменных и констант в программе; пример
8.Стандартная функция printf ( ) и scanf ( ) в языке Си
9.Простые операторы примеры
10.Составной оператор языка Си, пример
11.Операторы перехода, пример
12.Условный оператор языка Си, пример
13.Оператор переключатель Си, пример
14.Общая схема оператора цикла,цикл с предусловием и Си пример
15.Цикл с постусловием в Си
16.Параметрический цикл в Си
17.Директивы препроцессора языка Си
18.Использование макроса в языке Си, пример
19.Массивы в языке Си, инициализация, ввод, вывод массивов, примеры
20.Двумерные массивы в Си, задание элементов генератором случайных чисел
Читайте также
Помогите пожалуйста)) очень-очень срочно(( С# Получить элементы массива А по формуле .... Вычисленый массив вывести на печать.
Найти максимальный по модулю элемент массива А.
Массив я вычислил, а остальное не получается(
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication27
{
class Program
{
static void Main(string[] args)
{
int n = 30;
double[] a = new double[30];
for (int i = 0; i <= 20; i++)
{
a[i] = Math.Sqrt(i ^ 2 + 1) - Math.Sin(i / n);
Console.WriteLine("a(" + i + ")=" + a[i]);
}Console.ReadKey();
}
}
}
дан целостный массив из 30 элементов. элементы массива могут принимать целые значения от 0 до 100 опишите на русском языке или одном из языков
программирования алгоритм позволяющий найти и вывести номер элемента массива имеющего максимальное значение сре элементов массива которые делятся на 3 и кратны 5
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на русском языке или на одном из языков
программирования алгоритм, позволяющий найти и вывести сумму элементов массива, кратных тринадцати. Гарантируется, что в исходном массиве есть хотя бы один элемент, значение которого делится на тринадцать. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.
const N=30;
var a: array [l..N] of integer;
i,j,s: integer;
begin
for i:=l to N do readln(a[i]);
...
end.
Вы находитесь на странице вопроса "Найти произведение всех ненулевых элементов массива D. Массив D(10). Ограничение D с нижним индексом i не равно 0 VBA", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.