Каждый день ученик получал одну пятерку , три двойки и на 4 тройки больше чем всех оценок. Вопрос: сколько у ученика будет троек через год , два месяца , неделю и 3 дня. Простите за не очень качественную формулировку.

var five,two, three,time,all: integer; begin writeln('Введите количество пятерок и двоек'); readln(five,two); three:=4*(five+two); writeln('Каждый день ученик получает ', three,' троек'); all:=436* three; writeln('За год, два месяца, одну неделю и 3 дня ученик получит ', all,' троек'); readln; end.