512 байт = 512*8 бит
Для хранения 1 пикселя необходимо 512*8/(64*64) = 1 бит
Количество цветов = 2^1 = 2
Var a,b:real;
begin
write('a, b: ');
readln(a,b);
writeln(a,' + ',b,' = ',a+b);
if a+b<1
then if a<b then a:=(a+b)/2 else b:=(a+b)/2
else if a<b then a:=a+b else b:=a+b;
writeln('a = ',a,' b = ',b);
end.
Пример:
a, b: -2.8 4.5
-2.8 + 4.5 = 1.7
a = 1.7 b = 4.5
Антивирус не может:
г) сжимать файлы
Program chik;
var a,b:string;
i,l:integer;
begin
readln(a);
b:='';
l:=length(a);
for i:=1 to l do
begin
b:=b+a[i]+' ';
end;
writeln(b);
end.
Варианты могут быть разные
1) берем черного кота
2) связываем лапы
3) мажем всю шкуру осветлителем
4) ждем положенное время, слушая непрерывное мявканье
5) смываем осветлитель с кота
6) размешиваем хну с кипятком
7) мажем всю шкуру кота
8) ждем положенное время, слушая непрерывное мявканье
9) смываем хну с кота
10) развязываем лапы
должен получиться рыжый кот
но лучше так не делать) гринпис не одобрит