задание по икт!

В программу вводится десятичное целое число N (1

program prim;

var i,x : integer;

begin

x: =1;

for i: =1 to 5 do

begin write (x,'   ');

x: =x+2;

end;

end. 

у меня тоже даша получилось))

а столбчатая диаграмма

б график 

в ярусная диаграмма

г областная диаграмма

дкруговая диаграмма

каждый цвет может иметь 4 значения 2^2

если базовых цвета 3(rgb) то всего получится 4*4*4=64 цвета