Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1мб/2=512 кб на одну страницу
512*1024*8=4194304 бит на одну страницу
800*600=480 000 пискселей на одну страницу
4194304/480 000=8,74 бит на 1 пиксель, округляем в меньшую сторону по битам=8
2⁸=256 количество цветов можно использовать
друг жить на любом этаже дома. поэтому, для решения используем уравнение 24=х. но 24=16. следовательно, х=16. в доме 16 этажей.
for i : = 1 to length(s) do
begin
res : = res + s[i];
if i mod 2 = 0 then
end;
writeln(res);
i : = pos(" ",s); {ищем первый пробел}
delete(s; i; 1); {удаляем первый пробел}
i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}
writeln(s[i-1]); {выдаем знак который находится перед пробелом}
var x1,x2,x3,s1,s2,s3: integer;
function sumofnumber(num: integer): integer;
var s: string;
i: integer;
s: =str(num);
for i: = 1 to length(s) do
sumofnumber: = sumofnumber+int(s[i]);
read(x1,x2,x3);
s1: =sumofnumber(x1);
s2: =sumofnumber(x2);
s3: =sumofnumber(x3);
if s1> s2 and s1> s3 then writeln(x1);
if s2> s1 and s2> s3 then writeln(x2);
if s3> s2 and s3> s1 then writeln(x3);
end.
в правильности написания функции типов не уверенна.
Популярные вопросы