|
大小: 675
备注:
|
大小: 3150
备注:
|
| 删除的内容标记成这样。 | 加入的内容标记成这样。 |
| 行号 1: | 行号 1: |
| ## page was renamed from 各种语言的HelloWorld程序 = 程序设计语言 = <<TableOfContents>> ||语言||编译类型||类型|| ||[[C]]||编译||静态强类型|| ||[[C++]]||编译||静态强类型|| ||[[Python]]||(先自动编译成中间码)解释||动态强类型|| ||Lisp||解释||?|| ||Delphi||编译||?|| ||Perl||解释||?|| ||VB||?||?|| ||Java||先编译再解释||静态强类型|| ||JavaScript||解释||?|| ||TCL||?||?|| ||SmallTalk||?||?|| * [[https://www.tiobe.com/tiobe-index/|TIOBE Index]] * [[https://en.wikipedia.org/wiki/%22Hello,_World!%22_program|Hello World]] |
|
| 行号 20: | 行号 42: |
| }}} | |
| 行号 21: | 行号 44: |
| }}} | == Lisp == * XLISP: http://www.mv.com/ipusers/xlisper/ * XLISP PLUS: http://almy.us/xlisp.html * [[http://daiyuwen.freeshell.org/gb/rol/roots_of_lisp.html|Lisp之根源]] |
| 行号 52: | 行号 79: |
一个Delphi教程:[[attachment:delphitut.zip]] == Perl == {{{ package Message; # Message class constructor sub new { my $class = shift; my $txt = shift; my $self = {}; $self->{txt} = $txt; bless ($self, $class); return $self; } #Message->print() method sub print{ my $self = shift; if ($self->{txt} eq ""){ print "No message"; }else{ for($i=0;$i<3;$i++){ print $self->{txt},"\n"; } } return $self } 1; }}} {{{ require Message; $m = Message->new("Hello World"); $m->print(); }}} * Robert's Tutorial: http://perl.sioc.org/win32perltut.html == Visual BASIC == {{{ class Message Private theTxt Public Property Let TXT(S) theTxt = S End Property Public Sub Print() Wscript.echo theTxt End Sub End Class Dim M set M = new Message M.TXT = "Hello world" m.Print() }}} * VB教程: [[attachment:vb_site.zip]] == Java == {{{ class Msg{ private String txt; public Msg(String s){ txt = s; } public void print(){ System.out.println(txt); } } public class hello{ public static void main(String args[]){ Msg M = new Msg("hello world"); M.print(); int i = 0; } } }}} 一个简洁的Java教程:[[attachment:Java Programming for beginners in fourhours.htm]] == JavaScript == 一个Java Script教程:[[attachment:jsintro.zip]] == Smalltalk == * Dolphin Smalltalk: http://www.object-arts.com/content/navigation/products/dce.html 文档:http://www.object-arts.com/docs/index.html [[attachment:DolphinEducation.exe]] == Tcl == * http://www.noucorp.com/ |
程序设计语言
语言 |
编译类型 |
类型 |
编译 |
静态强类型 |
|
编译 |
静态强类型 |
|
(先自动编译成中间码)解释 |
动态强类型 |
|
Lisp |
解释 |
? |
Delphi |
编译 |
? |
Perl |
解释 |
? |
VB |
? |
? |
Java |
先编译再解释 |
静态强类型 |
解释 |
? |
|
TCL |
? |
? |
? |
? |
1. C++
2. Lisp
XLISP PLUS: http://almy.us/xlisp.html
3. Delphi
program hellopas;
{$APPTYPE CONSOLE}
uses windows;
type Message = class
txt : string;
constructor create(s:string);
procedure print;
end;
constructor Message.Create(s:string);
begin
txt := s
end;
procedure Message.print;
begin
writeln(txt)
end;
var m : Message;
begin
m := Message.Create('Hello world');
m.print()
end.一个Delphi教程:delphitut.zip
4. Perl
package Message;
# Message class constructor
sub new {
my $class = shift;
my $txt = shift;
my $self = {};
$self->{txt} = $txt;
bless ($self, $class);
return $self;
}
#Message->print() method
sub print{
my $self = shift;
if ($self->{txt} eq ""){
print "No message";
}else{
for($i=0;$i<3;$i++){
print $self->{txt},"\n";
}
}
return $self
}
1;require Message;
$m = Message->new("Hello World");
$m->print();Robert's Tutorial: http://perl.sioc.org/win32perltut.html
5. Visual BASIC
class Message
Private theTxt
Public Property Let TXT(S)
theTxt = S
End Property
Public Sub Print()
Wscript.echo theTxt
End Sub
End Class
Dim M
set M = new Message
M.TXT = "Hello world"
m.Print()VB教程: vb_site.zip
6. Java
class Msg{
private String txt;
public Msg(String s){
txt = s;
}
public void print(){
System.out.println(txt);
}
}
public class hello{
public static void main(String args[]){
Msg M = new Msg("hello world");
M.print();
int i = 0;
}
}一个简洁的Java教程:Java Programming for beginners in fourhours.htm
7. JavaScript
一个Java Script教程:jsintro.zip
8. Smalltalk
Dolphin Smalltalk: http://www.object-arts.com/content/navigation/products/dce.html 文档:http://www.object-arts.com/docs/index.html DolphinEducation.exe