DATA 101,98,100,108,97,106,99,100,112,96,107,98 DIM a(1 TO 12) AS INTEGER DIM b(1 TO 12) AS INTEGER, c(1 TO 12) AS INTEGER DIM i AS INTEGER, ib AS INTEGER, ic AS INTEGER CLS ib = 0: ic = 0 FOR i = 1 TO 12 READ a(i) SELECT CASE a(i) CASE 100 ib = ib + 1 b(ib) = i CASE IS > 100 ic = ic + 1 c(ic) = i END SELECT NEXT i
PRINT "План (100%) в месяцах: "; FOR i = 1 TO ib PRINT b(i); NEXT i PRINT PRINT "перевыполнение плана в месяцах "; FOR i = 1 TO ic PRINT c(i); NEXT i END
Результат выполнения программы: План (100%) в месяцах: 3 8 перевыполнение плана в месяцах 1 4 6 9 11
Все формулы прописываем для товара А и далее растягиваем
Искомое значение - буква необходимого нам товара
Таблица - таблица, где прописаны товар и его цена/товар и его количество, выделяем без шапочки таблицы, не забывая поставить знак $, так как диапазон изменяться не будет
Номер столбца/номер строки - у нас второй столбец, вторая строчка, поэтому 2
Интервальный просмотр - Ложь, так как значения не отсортированы по возрастанию, нам нужно точное совпадение
DIM a(1 TO 12) AS INTEGER
DIM b(1 TO 12) AS INTEGER, c(1 TO 12) AS INTEGER
DIM i AS INTEGER, ib AS INTEGER, ic AS INTEGER
CLS
ib = 0: ic = 0
FOR i = 1 TO 12
READ a(i)
SELECT CASE a(i)
CASE 100
ib = ib + 1
b(ib) = i
CASE IS > 100
ic = ic + 1
c(ic) = i
END SELECT
NEXT i
PRINT "План (100%) в месяцах: ";
FOR i = 1 TO ib
PRINT b(i);
NEXT i
PRINT
PRINT "перевыполнение плана в месяцах ";
FOR i = 1 TO ic
PRINT c(i);
NEXT i
END
Результат выполнения программы:
План (100%) в месяцах: 3 8
перевыполнение плана в месяцах 1 4 6 9 11
Все формулы прописываем для товара А и далее растягиваем
Искомое значение - буква необходимого нам товара
Таблица - таблица, где прописаны товар и его цена/товар и его количество, выделяем без шапочки таблицы, не забывая поставить знак $, так как диапазон изменяться не будет
Номер столбца/номер строки - у нас второй столбец, вторая строчка, поэтому 2
Интервальный просмотр - Ложь, так как значения не отсортированы по возрастанию, нам нужно точное совпадение
Стоимость находим перемножая цену и количество