Всего в изображении
45 * 20 = 900 точек. Если в палитре
265 цветов, то на хранения одной точки понадобится
бит (
1 байт). Следовательно, информационный объём изображения равен
900 * 8 = 7200 бит или же
~7.03 байт.
Program anima;
Var a,b,c:integer; // Стороны треугольника
begin
writeln('Введите длины сторон: '); // Вывод на экран с последующей строкой
readln(a,b,c); // Вводимые переменные (стороны)
if (a=b) and (a=c) and (b=c) then // Условие
writeln('Треугольник равносторонний')
else
writeln('Треугольник не равносторонний');
readln;
<span>end.</span>
Истинное высказывание:
12+24=36
Ложное высказывание:
16+10=23
Program TRAPECIYA;
var x1, x2 ,y1, y2, P, S:real;
begin
writeln("Введите значение верхнего основания");
readln(y1);
writeln("Введите значение нижнего основания");
<span> readln(y2);
</span> writeln("Введите значение левой грани");
<span> readln(x1);
</span> writeln("Введите значение правой стороны");
<span> readln(x2);
</span>P:=y1+y2+x1+x2;
S:=((y1+y2)/2)*sqrt(sqr(x1)-(sqr(sqr(y2-y1)+sqr(x1)-sqr(x2))/(2*(y2-y1)))
writeln(P);
writeln(S);
end
