1)
Program Имя программы;
Uses Подключаемые библиотеки (модули);
Label Список меток основной программы;
Const<span> Введение констант;</span>
Type Описание новых типов;
Var<span> Описание переменных и их типов;</span>
<span>Определение </span><span>процедур;</span>
<span>Определение </span><span>функций;</span>
Begin
Тело основной программы;
End.
2)x_y ; progl
3)
integer целая
char один символ
boolean логическая
real вещественная
string символьная строка
4)
5+y:=x;
a:=7,5;
b:=2*(a;
5)
4
0
не верное выражение(выдаст ошибку)
1
5)
var a,b,p:real;
begin
Write('Введите a >>> ');
Read(a);
Write('Введите b >>> ');
Read(b);
p:=a+b+Sqrt(a*a+b*b);
Writeln('===================');
Write('Периметр >>> ',p);
end.
7. 2 цвета кодируются глубиной цвета в 1 бит, т.к. 2 = 2^1. Значит рисунуко 184*2048 займет 184*2048*1 = 376832 бит = 47104 байт = 46 кбайт (8 бит = 1 байт, 1 кбайт = 1024 байт)
8. В рисунке 256*208 всего 256*208 = 53248 пикселей.
13 кбайт = 13312 байт = 106496 бит
Получаем глубину цвета, поделив информационный объем на количество пикселей: 106496/53248 = 2 бита на цвет.
С помощью 2-х бит можно закодировать 2^2 = 4 цвета.