Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ну, в первом тексте информационный объем одного символа составляет
n=2^i
32=2^5
i=5 бит
во втором текте
64=2^6
i=6
значит, в 1,2 раза (6: 5=1,2)
program xxx;
var d, x1, x2, y1,y2 : real;
begin
write('введите координаты 1 точки: ');
readln(x1, y1);
write('введите координаты 2 точки: ');
readln(x2, y2);
d: =sqrt(sqr(x2-x1)+sqr(y2-y1));
write('растояние между точками =', d);
readln
end.
program;
var
max,val: integer;
label
start, ends;
max: =-50;
val: =50;
start:
if val> max then val: =val-10
if val=max then goto ends;
goto start;
ends:
var a: array [1..10] of integer;
i,k: integer;
read(a);
k: =1;
for i : = 1 to 10 do
if a[k]> a[i] then k: =i;
end;
if k mod 2 = 0 then writeln(k," - chetnoe")
else writeln(k," - ne chetnoe");
Популярные вопросы