Составить программу вычисляющую длину окружности и площадь круга радиуса 5, 6 см​

Пишу на языке Pascal

Программа:

var

 l5cm, s5cm,l6cm, s6cm :real;

begin

 l5cm := 2*5*3,14;

 l6cm := 2*6*3,14;

 s5cm := 3,14*5*3,14;

 s6cm := 3,14*6*3,14;

 writeln('Длина окружности при R = 5 см равен ',l5cm,' см.' );

 writeln('Площадь окружности при R = 5 см равен ',s5cm,' см.' );

 writeln('Длина окружности при R = 6 см равен ',l6cm,' см.' );

 writeln('Площадь окружности при R = 6 см равен ',s6cm,' см.' );

end.

1)дюймовочка

2)змей горыныч (3 головы)

3)снегурочка(сделана из снега)

4)буратино (необычно длинный нос)

64 * 64 = 4096

512 * 8 = 4096 бит

4096 : 4096 = 1 бит

n = 2^i

n = 2^1 = 2 цвета

ответ. 2 цвета.