Пример за проста програма
25 отговора
1684 прегледа
Пример за проста програма
Еми аз нищо не разбирам от програмиране! Искам само да питам (и дано някой се наеме да ми каже :)!) за един пример за проста програма. Даже и да е изключително проста и дали мога да я направа на Notepad с разширение .exe.
Само ми напишете едно малко кодче!
Само ми напишете едно малко кодче!
Re: Пример за проста програма
========================
C
========================
#include <stdio.h>
void main()
{
printf("Hello World!\n");
}
========================
C++
========================
#include <iostream.h>
void main()
{
cout << "Hello World!\n";
}
========================
PASCAL
========================
Begin
writeln('Hello World!');
End.
========================
BASIC PRAVETZ 82/8M/8C/8D :0)
========================
1 PRINT "HELLO WORLD!" : PRINT
========================
C
========================
#include <stdio.h>
void main()
{
printf("Hello World!\n");
}
========================
C++
========================
#include <iostream.h>
void main()
{
cout << "Hello World!\n";
}
========================
PASCAL
========================
Begin
writeln('Hello World!');
End.
========================
BASIC PRAVETZ 82/8M/8C/8D :0)
========================
1 PRINT "HELLO WORLD!" : PRINT
========================
Re: Пример за проста програма
Абе примерно програма от най-простите, която те пита: "Ще вали ли днес" и ако кажеш "да" да изпише "Вземи си чадър"! А на Pascal знам как става и с Javascript мога да го направя. Ма къв компилатор да ползвам, щот аз май нямам!
Re: Пример за проста програма
за JScript-a не ти трябва компилатор. просто си сложи разширение .js на файла и можеш да го пуснеш в explorer-a
Re: Пример за проста програма
perl
-
perl -e 'print "Hello World!\n"
-
lisp
-
(defun mom4ence () (print (list 'Hello 'World)))
-
python
-
print "Hello World!"
-
asm ;nasm -f elf momshence.asm; ld momshence.o -o momshenceee; ./momshenceee
-
section .data
hw db 'Hello World!',0AH
len equ $-hw
section .text
global _start
_start: mov edx,len
mov ecx,hw
mov ebx,1
mov eax,4
int 80h
mov ebx,0
mov eax,1
int 80h
-
mom4ence.java /* javac mom4ence.java; CLASSPATH=.:$CLASSPATH; java mom4ence */
-
public class mom4ence{public static void main(String[] argv){System.out.println("Hello World!");}}
-
prolog /v chest na dimd00d/
-
MomSHencE:-
write('Hello World!' ).
}
-
awk
-
awk 'BEGIN{print "Hello World!"}'
-
hehehe
-
%!PS-Adobe
(Hello World!\n) print
-
/* haide stiga tolkova che shte otkradna fsichkite igrachki na momshenceto
*/
-
perl -e 'print "Hello World!\n"
-
lisp
-
(defun mom4ence () (print (list 'Hello 'World)))
-
python
-
print "Hello World!"
-
asm ;nasm -f elf momshence.asm; ld momshence.o -o momshenceee; ./momshenceee
-
section .data
hw db 'Hello World!',0AH
len equ $-hw
section .text
global _start
_start: mov edx,len
mov ecx,hw
mov ebx,1
mov eax,4
int 80h
mov ebx,0
mov eax,1
int 80h
-
mom4ence.java /* javac mom4ence.java; CLASSPATH=.:$CLASSPATH; java mom4ence */
-
public class mom4ence{public static void main(String[] argv){System.out.println("Hello World!");}}
-
prolog /v chest na dimd00d/
-
MomSHencE:-
write('Hello World!' ).
}
-
awk
-
awk 'BEGIN{print "Hello World!"}'
-
hehehe
-
%!PS-Adobe
(Hello World!\n) print
-
/* haide stiga tolkova che shte otkradna fsichkite igrachki na momshenceto
Re: Пример за проста програма
Трябва да го пусне достатъчно от високо (20-30 пиксела).
Поне при мен така тръгва...
Е ако е по-сложна програмата требва да е от по-високо
Поне при мен така тръгва...
Е ако е по-сложна програмата требва да е от по-високо
Re: Пример за проста програма
hahahaha
koeto navenzhda na "Kak Da Uskorim McIntosh"?
ami kak - sus G...
ne sum li dork, a?
tirulirutatuutuu
koeto navenzhda na "Kak Da Uskorim McIntosh"?
ami kak - sus G...
ne sum li dork, a?
tirulirutatuutuu
Re: Пример за проста програма
forth
st var "Hello world!" -> st st print
li
set $1 "Hello world!"
set /out screen $1
asm 652 (PRAVETZ 8x (-8D)) ;-)
hw db 'HELLO WORLD!',$0d
ldy #$0d
ldx #$00
lda hw,x
z1:
jsr $fded
inx
dey
bne z1
fortran 77
print "HELLO World!"
fkl
"Hello World!" .
st var "Hello world!" -> st st print
li
set $1 "Hello world!"
set /out screen $1
asm 652 (PRAVETZ 8x (-8D)) ;-)
hw db 'HELLO WORLD!',$0d
ldy #$0d
ldx #$00
lda hw,x
z1:
jsr $fded
inx
dey
bne z1
fortran 77
print "HELLO World!"
fkl
"Hello World!" .
Re: Пример за проста програма
pochwam da si mislja che tova veche e zagovor... neshto ne mi e na kef...
Shte si pusna na Black Sabbath - Paranoid :) da se uspokoja che ima i drugi :)
tirulirutatuutuu
Shte si pusna na Black Sabbath - Paranoid :) da se uspokoja che ima i drugi :)
tirulirutatuutuu
Re: Пример за проста програма
DEBUG.EXE
-A
MOV AH,9
MOV DX,109
INT 21
RET
-E109 'HELOMELO TRALALA OPALA$'
-RCX
20
-NA.COM
-W
-Q
S KOEOT IMAS PROGRAMKATA A.COM
-A
MOV AH,9
MOV DX,109
INT 21
RET
-E109 'HELOMELO TRALALA OPALA$'
-RCX
20
-NA.COM
-W
-Q
S KOEOT IMAS PROGRAMKATA A.COM
Re: Пример за проста програма
Eto, malko asembler za MIPS-R2000
Niakoi move li da napishe outputa bez da startira taia programka?
.data
Space: .space 108
Layer: .asciiz "Layer "
NewLine: .asciiz "\n"
interval: .asciiz " "
.text
.globl main
main:
la $s0, Space #Pointer to the allocated block in memory
li $t0, 0 #The counter
li $t8, 27 #Serves for the comparison
iteration:
li $v0, 5
syscall
sw $v0, ($s0)
add $t0, $t0, 1
add $s0, $s0, 4
blt $t0, $t8, iteration
#initializing counter registers
li $t3, 0 #Used to count the elements from the rows
li $t4, 0 #Used to count the number of rows
li $t5, 1 #Used to count the number of layers
li $t6, 0 #Used as a boundary for counting the rows
la $s0, Space
li $s1, 0
layer:
la $a0, NewLine
li $v0, 4
syscall
li $v0, 4 #Print the sign "Layer"
la $a0, Layer
syscall
li $v0, 1 #Print the number of the layers
move $a0, $t5
syscall
add $t5, $t5, 1 #Increment the number of the layer
add $t6, $t6, 9
row:
la $a0, NewLine
li $v0, 4
syscall #Print a new line
add $t4, $t4, 3
loop:
lw $t7, ($s0)
move $a0, $t7
li $v0, 1
syscall
la $a0, interval
li $v0, 4
syscall
add $s0, $s0, 4
add $s1, $s1, 1
blt $s1, $t4, loop
blt $t4, $t6, row
check:
blt $t6, $t8, layer
li $v0, 10
syscall
Niakoi move li da napishe outputa bez da startira taia programka?
.data
Space: .space 108
Layer: .asciiz "Layer "
NewLine: .asciiz "\n"
interval: .asciiz " "
.text
.globl main
main:
la $s0, Space #Pointer to the allocated block in memory
li $t0, 0 #The counter
li $t8, 27 #Serves for the comparison
iteration:
li $v0, 5
syscall
sw $v0, ($s0)
add $t0, $t0, 1
add $s0, $s0, 4
blt $t0, $t8, iteration
#initializing counter registers
li $t3, 0 #Used to count the elements from the rows
li $t4, 0 #Used to count the number of rows
li $t5, 1 #Used to count the number of layers
li $t6, 0 #Used as a boundary for counting the rows
la $s0, Space
li $s1, 0
layer:
la $a0, NewLine
li $v0, 4
syscall
li $v0, 4 #Print the sign "Layer"
la $a0, Layer
syscall
li $v0, 1 #Print the number of the layers
move $a0, $t5
syscall
add $t5, $t5, 1 #Increment the number of the layer
add $t6, $t6, 9
row:
la $a0, NewLine
li $v0, 4
syscall #Print a new line
add $t4, $t4, 3
loop:
lw $t7, ($s0)
move $a0, $t7
li $v0, 1
syscall
la $a0, interval
li $v0, 4
syscall
add $s0, $s0, 4
add $s1, $s1, 1
blt $s1, $t4, loop
blt $t4, $t6, row
check:
blt $t6, $t8, layer
li $v0, 10
syscall
Re: Пример за проста програма
auuu kakvo si sladur4e...copy-nal si go s bash comentite 
Re: Пример за проста програма
Wsashtnost twa go napisah predi 3 chasa stoto imam izpit utre po tapia Mips asembler..., momichence 
Re: Пример за проста програма
Towa e programkata :
Prawish now file s Notepad
pishesh w nego (tochno towa koeto pishe dolu - s drugo ne stawa) :
En taro Adun!
Posle Save as
programka.hta
posle double click na programka.hta
pochitaniq,
Yontchew
P.S. : pochitaniq i na Momche
Prawish now file s Notepad
pishesh w nego (tochno towa koeto pishe dolu - s drugo ne stawa) :
En taro Adun!
Posle Save as
programka.hta
posle double click na programka.hta
pochitaniq,
Yontchew
P.S. : pochitaniq i na Momche
ebasi i izvratenia assembler (MIPS)
ujas! kato stanat po-masovi tia RISC procesori kvo sa praim?