Var
p: integer;
begin
readln(p);
if p=5 then print('Молодец!')
else if p = 4 then print('Хорошо!')
else if p<=3 then print('<span>Лентяй!</span>')
end.
//правильно вот так:
Program al;
var c: real;
begin
c:=4.75;
writeln('c=',c);
end.
- слух. Уши
- вкус. Язык
-запах. Нос
-ощущать прикосновения. Все тело
Орел-зрение
Волк-обоняние
Летучая мышь-слух
Крот-осязание
1.<span>Три базовых цвета- Red, Green, Blue. На каждый по два бита - получается по 4 бита градации на цвет. того 4*4*4= всего 64</span>