Program massiv;
Const N=10;
Var Rmin: integer;
j,i:integer;
C:array[1..N] of real;
T:array[1..2*N]of real;
Begin
For i:=1 to N do Begin
C[i]:=sqrt(i)* sin(2*i)/cos(2*i);
Write(C[i]:5:2, ' ');
End;
writeln('');
8 бит - 1 байт бла бла бла бла
Абсолютная адресация указывается знаками доллара и перед номером строки, и перед номером столбца.
Следовательно, $C$7.
Для представления чисел в микропроцессоре используется двоичная система счисления.
При этом любой цифровой сигнал может иметь два устойчивых состояния: «высокий уровень» и «низкий уровень». В двоичной системе счисления для изображения любого числа используются две цифры, соответственно: 0 и 1. Произвольное число <span>x=anan-1..a1a0,a-1a-2...a-m</span> запишется в двоичной системе счисления как
<span>x = an·2n+an-1·2n-1+...+a1·21+a0·20+a-1·2-1+a-2·2-2+...+a-m·2-m</span>
где <span>ai</span> - двоичные цифры (0 или 1).
Uses Crt;
var E, F, X, Y, Z: real;
bol: boolean;
begin
ClrScr;
Write(' E = '); ReadLn(E);
Write(' F = '); ReadLn(F);
Write(' X = '); ReadLn(X);
Write(' Y = '); ReadLn(Y);
Write(' Z = '); ReadLn(Z);
bol:=(X>=E) and (X<=F) and (Y>=E) and (Y<=F) and (Z>=E) and (Z<=F);
if bol=true then Writeln (' Принадлежат !!!')
else WriteLn (' Нет...');
ReadLn;
end.