Program ploshad;
uses crt;
var a,b,c:real;
begin
write('a= ');
readln(a);
write('b= ');
readln(b);
If (a<=0)or(b<=0) then
write('Сторона не может быть отрицательной, либо равна нулю')
else
c:=a*b;
writeln('Площадь квадрата, с заданными параметрами равна - ',c);
c:=a*b/2;
writeln('Площадь прямоугольного треугольника, с заданными параметрами равна - ',c);
<span>end.
Это лишь для квадрата и прямоугольного треугольника :-)</span>
Var
a, b, c, s: integer;
begin
readln(a, b, c);
s := a+b+c;
writeln(s);
end.
Для того, чтобы сделать фоновый цвет, то нужно выбрать необходимый цвет и выбрать заливку
16000000*5*60=4800000000 (бит);
4800000000/(8*1024*1024*1024)=4800000000/8589934592≈0,56 (гигабайт);
0,56<1;
Ответ: 1) ≈0,56 гигабайт;
2) 0 рублей.
Допустим у нас в текстовом документе 1536 символов,1536 единиц в десятичной системе.
1536 символов = 1.536 килобайт =1.5 килобайт
1 символ = 1 байт
1000 байт = 1 килобайт
Одна цифра в двоичном коде = 1 байт
Немного попутал я, извиняюсь, теперь правильно.