Для целого числа к от 1 до 99 напечатать фразу "мне k лет",учитывая при этом, что при некоторых значениях k слово "лет"надо заменить на слово год или года.
Например,11 лет, 22 года,51 год. ПАСКАЛЬ, ПОЖАЛУЙСТА
Считаем количество символов в парольном алфавите 10 (цифры) + 11 строчных + 11 прописных = 32 символа 5 бит на символ (2^5 = 32) 15 символов * 5 бит = 75 бит, при записи пароля округляем вверх до байта, получим 10 байт. 30 паролей * 10 байт = 300 байт
DIM a(1 TO 10) CLS RANDOMIZE (TIMER) s = 0 FOR i = 1 TO 10 a(i) = CINT(21 * RND - 11) PRINT a(i); IF a(i) MOD 2 <> 0 THEN s = s + a(i) NEXT i PRINT PRINT "s = "; s