2. Для кодирования цвета фона страницы Интернет
используется атрибут bgcolor="#", где в
кавычках задаются шестнадцатеричные значения
интенсивности цветовых компонент в 24-битной
RGB-модели. Какой цвет будет у страницы, заданной
тэгом ?
1) красный 2) черный 3) зеленый 4) фиолетовый
Program tt;
var A,B,C,D: Real;
begin
Writeln ('Введите массу воды в граммах.'); Readln(A);
Writeln ('Введите массу соли в граммах.'); Readln(B);
D := B+A;
C := B/A;
Writeln ('Массовая доля соли в раствворе - ',C,'.');
End.
2.
Program tt;
var A,B,PL,Per: Real;
begin
Writeln ('Введите длинну первого катета.'); Readln(A);
Writeln ('Введите длинну второго катета.'); Readln(B);
PL := (B*A)/2;
PER := sqrt(B*B+A*A)+A+B;
Writeln ('Площадь - ',PL,'.');
Writeln ('Периметр - ',PER,'.');
End.