اكتب بروجرم فورمي بجميع لغات البرمجة !

[Gladiator]

بسم الله الرحمن الرحيم

اقدم لكم اليوم موضوع اكتب كلمة www.prog4me.com (http://www.prog4me.com) بجميع لغات البرمجة .

لغات الديسك توب و ايضا لغات الويب . :)



ASP

<% Response.Write(www.Prog4Me.Com (http://www.prog4me.com/)) %>


php

<?php
echo 'www.Prog4Me.Com' ;
?>
#or use short-hand echoing, syntaxed as such:
<?=www.Prog4Me.Com?>


ANSI C


#include <stdio.h>

int main()
{
printf(www.Prog4Me.Com (http://www.prog4me.com/)\n);
return 0;
}





Batch (MS-DOS)




@echo www.Prog4Me.Com (http://www.prog4me.com/)


or


@echo off
set progstring=www.Prog4Me.Com (http://www.prog4me.com/)
echo %progstring%


C++



#include <iostream>

int main()
{
std::cout << "www.Prog4Me.Com (http://www.prog4me.com/) " << std::endl;
return 0;
}


or

#include <iostream>
using namespace std;

int main()
{
cout << "www.Prog4Me.Com (http://www.prog4me.com/)" << endl;
return 0;
}



DarkBasic


print "www.Prog4Me.Com (http://www.prog4me.com/)"
wait key



GW-BASIC



10 PRINT "www.Prog4Me.Com (http://www.prog4me.com/)"
20 END


Java

class www.Prog4Me.Com (http://www.prog4me.com/)
{
public static void main(String args[])
{
System.out.println("www.Prog4Me.Com (http://www.prog4me.com/)");
}
}


JavaScript


document.write ("www.Prog4Me.Com (http://www.prog4me.com/)") ; //on the page
alert ("www.Prog4Me.Com (http://www.prog4me.com/)") ; //optional; on a popup window


var P = "prog";
var M = "4me.com";
document.write(P + " " + M + "!"); //Write to document
window.alert(h + " " + P + "!"); //Popup box



Liberty BASIC

print "www.Prog4Me.Com (http://www.prog4me.com/)"


or


prog$ = "www.Prog4Me.Com (http://www.prog4me.com/)"
print prog$



Classic BASIC

10 PRINT "www.Prog4Me.Com (http://www.prog4me.com/)"



OpenScript

-- in a popup window
request "www.Prog4Me.Com (http://www.prog4me.com/)"


Pascal

program www.Prog4Me.Com (http://www.prog4me.com/);

begin
writeln('www.Prog4Me.Com (http://www.prog4me.com/)');
end.



Perl

As PL file:

print "www.Prog4Me.Com (http://www.prog4me.com/)";



As CGI file:



#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
print "<H1>www.Prog4Me.Com (http://www.prog4me.com/)</H1>";

Python

print "www.Prog4Me.Com (http://www.prog4me.com/)"


Revolution

Printed in the message box

put "www.Prog4Me.Com (http://www.prog4me.com/)"

Shown within a dialog box

answer "www.Prog4Me.Com (http://www.prog4me.com/)"


Printed on the main window interface


create field "myField"
set the text of field "myField" to "www.Prog4Me.Com (http://www.prog4me.com/)"



As CGI file



#!revolution

on startup
put "Content-Type: text/plain" & cr & cr
put "www.Prog4Me.Com (http://www.prog4me.com/)"
end startup




Ruby

puts 'www.Prog4Me.Com (http://www.prog4me.com/)'



Seed7



$ include "seed7_05.s7i";

const proc: main is func
begin
writeln("www.Prog4Me.Com (http://www.prog4me.com/)");
end func;




Tcl

set P prog
set m 4me.com
puts "$P $m!"



x86 Assembler (MS-DOS)

The source should be compiled and linked with Turbo Assembler Under MS-DOS.

.model tiny

.data
message db 'www.Prog4Me.Com (http://www.prog4me.com/)'

.code
org 100h

start:
mov ah,9
mov dx,offset message
int 21h

ret
end start




GNU Assembler (Linux)


.text
.global _start
_start:
movl $len,%edx
movl $www.Prog4Me.Com,%ecx
movl $1,%ebx
movl $4,%eax
int $0x80
movl $0,%ebx
movl $1,%eax
int $0x80
.data
www.Prog4Me.Com:
.ascii www.Prog4Me.Com (http://www.prog4me.com/)\n
len = . - www.Prog4Me.Com (http://www.prog4me.com/)




يارب الموضوع يعجبكم .

تقبلو تحياتي

Gladiator & Dado

[Dado]

الف شكر علي الموضوع الجميل ده يا بروف

[Gladiator]

الف شكر علي الموضوع الجميل ده يا بروف



العفو يادادو

البركة فيك يا دادو :)