Вмассиве d(10) найти сумму чисел , расположенных на нечетных местах. , . бейсик

Показать ответ

Ответ:

topovaya3

20.07.2020 23:33

CLS
DIM D(10)
DATA 12,10,11,34,3,3,2,3,4,5
S = 0
FOR i = 1 TO 10
READ D(i)
IF i / 2 = i \ 2 THEN
ELSE
S = S + D(i)
END IF
PRINT D(i),
NEXT i
PRINT "S="; S

0,0(0 оценок)

Популярные вопросы: Информатика

Dushanbe2003

12.01.2022 08:56

Представим гипотетический формат представления чисел с плавающей точкой, где под нормализованную мантиссу числа отводится 7 бит, а под порядок( без знака, со смещением 2³-1 ) отводится...

KatyaKuxar

12.01.2022 08:56

Для матрицы n×n, заполненной случайными целыми числами из диапазона [0; n], найти минимальный элемент в каждом столбце и заменить его на номер данного столбца. На языке Си...

bagira2912

12.01.2022 08:56

Нужно создать html документ. Шрифт: Vivaldi Размер: 23 Цвет: желтый Расположение: по левому краю Начертание: нет Рисунок: нет Шрифт: Lucida Bright Размер: 12 Цвет: оранжевый Расположение:...

Настёна30072003

23.11.2021 08:21

К инструментальным средствам представления функциональных моделей относятся...

Lero4ka222

19.01.2023 23:12

1.Призначення програми Microsoft Office Publisher 2.Дати визначення терміну Публікація 3.В яких режимах може працювати програма Publisher?4.Стандартний формат файлу для збереження...

ленок209

25.09.2020 11:53

Написать процедуру вычисления квадрата числа.Паскаль...

sailorproblema

13.03.2022 23:51

2. Составить программу: вычислить и напечатать площадь ромба при значении диагоналей d1=15,9 и d2 в 3 раза меньше d1. Формула площади ромба :...

KIRILLGAMER332

19.09.2022 04:18

Используя генератор случайных чисел randint и условный оператор if, составить программу, которая будет подсчитывать количество раз, когда при подбрасывании двух кубиков выпадет...

fafafafgaf6262

14.02.2020 23:01

Самостоятельно придумайте программу, в которой бы использовалась инструкция if(желательно с веткой else). вложенный код должен содержать не менее трех выражений....

niga2345

14.05.2021 22:52

Основные направления визуальной коммуникации реферат...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку