Решить таблицу истинности y=(a¬^b¬)галка вниз a

Если не применяя законы де-моргана, то, скорее всего, так: а в ¬а ¬в (¬a^¬b) y 0 0 1 1 1 1 0 1 1 0 0 0 1 0 0 1 0 1 1 1 0 0 0 1 при сохранении всё съехало первый столбец для а, второй для в, третий ¬а, четвертый ¬в, пятый (¬a^¬b), шестой итоговый y

Таблица в приложении

Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. тут всё просто - тебе лишь нужен цикл for и расчет процентов. for i = 1 to 100 percents = fix(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется round) x = x + percents 'тут всё понятно - переменной x присваивается она сама и годовые проценты по вкладу if x > = y then 'проверяем, не равен или не превысил  ли наш вклад ожидаемую сумму print i 'в цикле for можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет end 'завершаем программу end if next i ' конец цикла можно ещё чисто для себя добавить в условие вывод переменной x, чтобы было нагляднее.