сервис вопросов и ответовчерез QBasik. Дан массив W(9).Ищется по формуле W(9)=X^2+ctg X найти сумму и произведение всех чётных чисел. нужно написать
10-11 класс|
|
программу.....плиз....помогите
Drob4
31 июля 2013 г., 9:43:19 (10 лет назад)
Tamila95zz
31 июля 2013 г., 12:38:34 (10 лет назад)
CLS
t = 1
DIM w(9)
FOR i = 1 TO 9
a:
INPUT n
IF TAN(n) = 0 THEN PRINT "не может быть": GOTO a
w(i) = n ^ 2 + 1 / TAN(n)
IF INT(w(i) / 2) = w(i) / 2 THEN s = s + w(i): t = t * w(i)
NEXT i
PRINT "cумма четных равна"; s
IF s=0 THEN PRINT PRINT "произведение четных равно 0" ELSE PRINT "произведение четных равно"; t
Ответить
Другие вопросы из категории
1. Из слова "пробел" путём замены его букв получить слово "продел" 2. В данной строк вставить пробел после каждого символа. 3. Дано
слово. Определить, одинаковы ли в нём второй и четвёртый символы.
Ребят, спасайте, надо задачку решить на C#. Дано число D (> 0). Последовательность чисел AN определяется следующим образом:
A1 = 1, A2 = 2, AN = (AN–2+ AN–1)/2, N = 3, 4, ... Найти первый из номеров K, для которых выполняется условие |AK AK–1| < D, и вывести этот номер, а также числа AK–1 и AK.
Если не трудно, то пожалуйста с комментариями/обьяснениями!
Читайте также
Задача первая.
Дан массив O ( K ). Заменить все положительные числа квадратом числа,а отрицательные модулем.
Задача вторая.
Дан массив R ( 6 ) .Найти сумму и произведение всех элементов массивов.
Через Qbasic
ОТ CLS ДО ЕND
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
Паскаль. 12.Дан массив А(3*4). Найти сумму первых отрицательных элементов в каждом столбце. 13.Даны два массива А(3*3)
и В(3*3). Вывести на экран тот из них, у которого меньше сумма элементов главной диагонали.
17.Дан массив А(3*4). Заменить все отрицательные элементы на противоположные.
Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Вы находитесь на странице вопроса "через QBasik. Дан массив W(9).Ищется по формуле W(9)=X^2+ctg X найти сумму и произведение всех чётных чисел. нужно написать", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.