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
◘Объективность информации. Например: "На улице холодно" - это субъективная информация. А "На улице -14°" - объективная (но не всегда точная) ◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна) ◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения. ◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д. ◘Актуальность информации – важность для настоящего времени. ◘Полезность информации. - Самая ценная информация – объективная, достоверная, полная, и актуальная.
Объяснение:
Графическом