代码搜索:Byte
找到约 10,000 项符合「Byte」的源代码
代码结果 10,000
www.eeworm.com/read/493719/6389378
pas ac1142.pas
program ural1142;
const
maxn=10;
var
f:array[0..maxn]of longint;
n,i:shortint;
function c(a,b:byte):longint;
var
x:longint;
i:byte;
begin
x:=1;
for i:=1 to b do
www.eeworm.com/read/493719/6389397
pas ac1162.pas
program ural1162;
const
maxn=100;
maxm=100;
var
v1,v2:array[1..maxm]of byte;
r1,c1,r2,c2:array[1..maxm]of real;
money:array[1..maxn]of real;
n,m,s,i,j:byte;
procedure go(a,b:byte;
www.eeworm.com/read/493722/6389402
pas ac1293.pas
program ural1293;
var
n,a,b:byte;
begin
read(n,a,b);
writeln(n*a*b*2);
end.
www.eeworm.com/read/493722/6389451
pas ac1213.pas
program ural1213;
const
maxn=30;
var
name:array[1..maxn]of string[20];
s:string;
n:byte;
procedure add(s:string);
var
i:byte;
begin
for i:=1 to n do
if s=name[i]
www.eeworm.com/read/493723/6389505
pas ac1324.pas
program ural1324;
const
r:longint=750000000;
var
l,m:longint;
t:byte;
function remain(x,y:longint):longint;
begin
remain:=x div y+y-2+ord(x mod y=y-1);
end;
function len(x:long
www.eeworm.com/read/493723/6389512
pas ac1323.pas
program ural1323;
const
maxn=10;
maxm=45;
maxstatus=511;
type
calllist=array[0..maxm]of integer;
var
name:array[1..maxn]of string[20];
v1,v2:array[1..maxm]of byte;
dist:array[0
www.eeworm.com/read/493547/6395258
bas sm2mod.bas
Attribute VB_Name = "HM2Mod"
Declare Function sndPlaySound Lib "WINMM.DLL" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As Any, ByVal uFlags As Long) As Long
Global Const SND_ASYNC = &H1 ' Pl
www.eeworm.com/read/493354/6401258
lst cp220x_reg.lst
C51 COMPILER V8.05a CP220X_REG 05/16/2009 15:36:50 PAGE 1
C51 COMPILER V8.05a, COMPILATION OF MODULE CP220X_REG
OBJECT MODULE PLACE
www.eeworm.com/read/493354/6401278
c cp220x_reg.c
//-----------------------------------------------------------------------------
// CP220x_REG.c
//-----------------------------------------------------------------------------
// Copyright 2006 Sil
www.eeworm.com/read/493068/6405636
frm frmethernetaddress.frm
VERSION 5.00
Begin VB.Form frmEthernetAddress
AutoRedraw = -1 'True
BorderStyle = 1 'Fixed Single
Caption = "网卡物理地址"
ClientHeight = 1740
ClientLeft