Var x,y:integer;
v:longint;
i:real;
x:=320;
y:=400;
v = 128000;
i:= v/(x*y);
writeln('Глубина цвета: ', i);
Program chik2;
var a,i,h,l:integer;
begin
l:=0;
h:=0;
for i:=1 to 10 do
begin
read(a);
if(a>0)then l:=l+1;
if(a<0)then h:=h+1;
end;
write(l,' ',h);
end.
l-кол-во полож
h-кол-во отрицательных
Https://www.imgonline.com.ua/gif-animation.php вот сайт
Визуальная - с помощью глаз ( видим картину)
Аудиальная -с помощью слуха ( слышим слова)
Обонятельная - с помощью органов обоняния ( запах сирени)
Вкусовая - с помощью вкусовых рецепторов ( вкус сока)
Тактильная - органы осязания ( чувствуем холодное железо