Var n, i: Integer;
x, sum, temp, cosx: Double;
begin
ReadLn(x, n);
sum:=0;
cosx:=cos(x);
temp:=1;
for i:=1 to n do begin
temp:=temp*cosx;
sum:=sum+temp;
end;
WriteLn(sum);
end.
Ответ:
900 Кб
Объяснение:
Истинный цвет, или True Color - это метод кодирования изображения, при котором каждый пиксель кодируется 24 битами.
Объем файла = ширина x высота x количество бит на пиксель
Объем = 640 * 480 *24 = 7 372 800 (бит) = 1024*7200 (бит) = 7200 (Кбит) = 900*8 (Кбит) = 900 Кбайт
function Время_дня(час) {
alert(час < 4 ? "Ночь" : час < 12 ? "Утро" : час < 16 ? "День" : час < 23 ? "Вечер" : "Ночь");
}