代码搜索:PL 有哪些应用?
找到约 10,000 项符合「PL 有哪些应用?」的源代码
代码结果 10,000
www.eeworm.com/read/379669/9189995
pl0 ric.pl0
PROGRAM RIC;
VAR
R:REAL;
I:INTEGER;
C:CHAR;
BEGIN
READ(R,I,C);
R:=R/13+12*1;
I:=I DIV 3+12 MOD 3;
WRITE(C);
C:='A';
WRITE(R,I,C);
END.
www.eeworm.com/read/379669/9189999
pl0 else.pl0
PROGRAM P1;
VAR I,MAX:INTEGER; X,Y:INTEGER;
BEGIN
READ(I,X,Y);
IF I>X THEN
MAX:=I
ELSE MAX:=X;
IF Y>MAX
THEN MAX:=Y;
WRITE(MAX);
END.
www.eeworm.com/read/379669/9190001
pl0 sort.pl0
PROGRAM SORT3;
VAR
A:ARRAY[1..4] OF REAL;
TEMP:REAL;
I,J:INTEGER;
BEGIN
FOR I:=1 TO 4 DO
READ(A[I]);
FOR I:=1 TO 4 DO
FOR J:=1 TO 4-I DO
IF A[J]
www.eeworm.com/read/379669/9190003
dsk pl01.dsk
[Closed Files]
File_0=SourceModule,'F:\TC\PL01\PL0.CPP',0,1,668,14,690,0,0
File_1=SourceModule,'D:\PROGRAM FILES\BORLAND\CBUILDER5\INCLUDE\windef.h',0,1,153,46,162,0,0
File_2=SourceModule,'D:\Progr
www.eeworm.com/read/379149/9206060
pl conf.change.pl
#!/usr/bin/perl -w
# this script patches a config.status file, to use our own perl script
# in the main loop
# we do it this way to circumvent hacking (and thereby including)
# autoconf function (whi
www.eeworm.com/read/379149/9206122
pl cvs-clean.pl
#! /usr/bin/perl
#
# This script recursively (beginning with the current directory)
# wipes out everything not registered in CVS.
#
# written by Oswald Buddenhagen
# inspired by the "
www.eeworm.com/read/378503/9228233
pl snort_stat.pl
#!/usr/bin/perl
#
# $Id: snort_stat.pl,v 1.3 2000/11/17 05:28:20 jpickel Exp $
# $Revision: 1.3 $
#
# snort_stat.pl is a perl script trying to generate statistical data from every
# day snort log fil
www.eeworm.com/read/378503/9228238
pl snort-sort.pl
#!/usr/bin/perl
#
# Filename: snort-sort
# Author: Andrew R. Baker
# Modified: 2000.03.06
# Purpose: this script produces a sorted list of snort alerts
#
www.eeworm.com/read/377561/9271142
pl0 testin.pl0
const m:=7,n=85;
var x,y,z,q,r;
procedure multiply;
var a,b;
begin a=x;b:=y;z:=0;
while b>0 do
begin if Odd b then z:=z+a;
a:=2*a;b:=b/c
end
end;
begin x:=m;y
www.eeworm.com/read/377561/9271152
pl0 testin.pl0
const m:=7,n=85;
var x,y,z,q,r;
procedure multiply;
var a,b;
begin a=x;b:=y;z:=0;
while b>0 do
begin if Odd b then z:=z+a;
a:=2*a;b:=b/c
end
end;
begin x:=m;y