Скинь сор я скину как решать.
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
a b c d e f g h i j k l m n o p q r s t u v w x y z
1 2 3 4 5 6 7 8 9 0
Специальные знаки (через пробелы):
~ ! @ # $ % ^ & * ( ) – + _ = [ ] ; : ‘ “ , . / \ < > ? |
Var A:real;
Begin
Write('Введите число: ');ReadLn(A);
if A>=0 then A:=sqrtA
else write(a) ;
Write(A);
End.
512*128=65536 пикселей
32 кб = 262144 бит
глубина цвета: 262144/<span>65536</span>=4 бит
2^4=16 цветов