всего точек 600*800=480 000
размер файла 512 мб
выясним размер 1 точки
512мб переведем в килобайты, далее в байты
512*1024*1024=536870912 байт размер картинки
536870912 делим на 480 000=1118.48 байт на 1 пиксель
16 млн цветов кодируются 3 байтами
составим пропорцию
16млн=3 байта
Х = 1118 байт
х= (1118*16)/3=5962.66 млн цветов
Ответ: 5962.66 млн цветов
А вообще под такие параметры не найдешь картинку) но это задача.
Задача 1.
Var
A:integer;
S:real;
Begin
S:=0;
For A:= 120 to 300 do
S:=S+A;
WriteLn('S = ',S);
End.
Результат работы программы:
S = 38010
<span>Задача 2.
Var S:real;
n,A:integer;
Begin
n:=0;
S:=0;
For A:= 15 to 100 do
if A mod 10 = 6 then
Begin
S:=S+A;
n:=n+1
End;
WriteLn('Sr = ',S,'/',n,' = ',S/n);
End.</span>
Var x,y:real;
begin
writeln('Введите координаты точки');
readln(x,y);
if (x>=0)and(y>=0)and(y<=(-1)*x+6)and(y>=(-2)*x+4)then writeln('True')
else writeln('False');
<span>end.</span>
А) при x ∈ [-3;8];
б) при x ∈ (- бесконечности;-3)V(8;+бесконечности).
Всё достаточно просто div деление нацело(т.е. без остатка) mod (выделение остатка от деления)
a:=7;простое присвоение
b:=7*2=14;умножение
a:=0+3=3;при деление 3 на 6 остаток равен нулю и плюс 3
b:=0+14=14 при деление 3 на 14 остаток 0 и плюс 14
Вот и всё :D