4-х цветное кажется это 2 бита, 10*10 это 100.
2*100=200битов=25байтов
" из 2056 символов в кодировке Unicode " это уже 2кб * 2-3 байта, в зависимости от ПК.
Конечно текст раз в сто больше рисунка.
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
procedure f(x:real;var y:real);
begin
y:=2*Cos(3*x)
end;
Полностью писать не буду. Это лёгкое, что я мог встретить.
Тебе для справки: 12, 1, 2 - это зима; 3, 4, 5 - это весна; 6, 7, 8 - это лето; 9, 10, 11 - это осень.
Для более компактности задачи ставишь условие "если больше 12 то нет такого время года".