Разрешение сканара А. Точки на дюйм
Наименьгая единица информации Е. Бит
8 двоичных разрядов Г октет
Расписываешь число по степеням основания СС:
если целая часть, то последнюю цифру умножаешь на основание СС в нулевой степени+предпоследняя на основание в 1 степени+...
если дробная часть, то первую цифру после запятой умножаешь на основание в -1 степени, вторую на основание в -2 степени+ ...
а)827
б)1031
в)181,5
г)262,65625
д)Пример перевода 671,24(8)=
= 1+56+384+0,25+0,0625=441,3125(10)
е)1050,375
Program month;
var a: Integer;
Begin
Writeln('Введите число от 1 до 3');
Readln(a);
If a=1 then writeln('Январь');
if a=2 then writeln('Февраль');
if a=3 then writeln('Март');
Readln;
end.
Пример:
<span>Введите число от 1 до 3
2
Февраль</span>
Var
a,b,i:integer;
begin
for i:=0 to 56 do
begin
if i mod 2 = 0 then a:=a-i else a:=a+i;
end;
end.
Program DvachAnon;
var x:real;
const a=7.5;
function CalcY(x:real):real;
begin
CalcY:= ((3*sqr(a)+2*abs(x))/(2*x-sqrt(3*a)))*2*cos(sqr(x));
end;
begin
write('Введите переменную "х":');
read(x);
writeln('y = ', CalcY(x));
end.
-------------------------------------------------------------
UPD: не уверен, как это правильно должно выглядеть, спросите у кого-нибудь знающего :D