RGB = 256*256*256 цветов = 16`777`216 цветов = 2^(8*3) = 2^24 т.е. 24 бита на пиксель
24*40*40 бит = 38`400 бит = 4`800 байт
В кодировке <span> ASCII один символ занимает 1 байт.
</span><span>Текст занимает 24 576 бит памяти
24576 бит /8 =3072 байта.
Значит текст содержит 3072 символа, включая пробелы</span>
Var
x:integer;
y:real;
begin
readln(x);
if x < 0 then
begin
y:= 1/x*x;
end
else
y:=x/6;
writeln(y);
end.
Вода: можно пить, лить, тушить огонь, мыть, играть и т.д. Человек: потребляет пищу, играет, ходит, учится , думает головой, читает книги и т.д.
uses crt;
var i,min,s:integer;
a:array[1..60] of integer;
begin
s:=0;
for i:=1 to 60 do a[i]:=random(35)+1;
min:=a[1];
for i:=1 to 60 do if min > a[i] then min:=a[i];
for i:=1 to 60 do if a[i] = min then inc(s);
writeln(s,' books for price = ',min,' ru.');
end.