С какими списками? Я не знаю по какому учебнику вы учитесь)
Begin
write(ReadSeqInteger(ReadInteger()).Where(x -> x mod 3 = 0).Sum);
end.
индекс равен 4 (на четвертом месте находится данное число -3)
3072/1536 и ответ это мощность использованного алфавита
Маша подарила лото, Жанна подарила цветы, Таня подарила раскраску, а Оля-куклу. Задача решается методом исключения.
По 1-му пункту: Маша и Жанна не дарили куклу и раскраску
по 2-му пункту Оля не дарила лото, раскраску и цветы
по 3-му пункту Маша не дарила цветы
Надеюсь, что всё понятно