Webmaster - Darmowe skrypty PHP,MYSQL - Programowanie - Turbo Pascal

uses crt; var a,b,c,min2,min1, max:integer; promien:real; begin Writeln ('Program oblicza promien okregu wpisanego w trojkat prostokatny !!!'); Write ('Podaj wartosc boku a : '); readln (a); Write ('Podaj wartosc boku b : '); readln (b); Write ('Podaj wartosc boku c : '); readln (c); if (a>=b) and (a>=c) then begin max:=a; min1:=b; min2:=c; end ; if (b>=c) and (b>=a) then begin max:=b; min1:=a; min2:=c; end ; if (c>=b) and (c>=a) then begin max:=c; min1:=b; min2:=a; end ; if max<>sqrt(sqr(min1)+sqr(min2))then  begin {twierdzenie pitagorasa} writeln ('Trojkat nie jest prostokatny !!!'); halt ; {koniec} end ; Writeln ('Promien o...

program ilosc_wyrazow; uses crt; var zdanie:string; i,licznik:byte; begin Writeln ('Wpisz teraz jakies zdanie i nacisnij ENTER:'); writeln ; readln (zdanie); for i:=1 to length (zdanie) do if zdanie[i]=' ' then licznik:=licznik+1; writeln ; writeln ('Wyrazow w twoim zdaniu jest : ',licznik+1); end .

program sortowanie_liczb; uses crt; const size=10; var tab: array[1..size] of integer; tmp: integer; i, j: integer; begin clrscr ; for i:=1 to size do begin write (i, ' element: '); readln (tab[i]); end ; for i:=size downto 2 do for j:=size downto size+2-i do begin if tab[j-1]>tab[j] then begin tmp:=tab[j]; tab[j]:=tab[j-1]; tab[j-1]:=tmp; end ; end ; writeln ; for i:=1 to size do begin writeln (tab[i],' '); end ; readkey ; end .

program sortowanie_liczb; uses crt; const size=10; var tab: array[1..size] of integer; tmp: integer; i, j: integer; begin clrscr ; for i:=1 to size do begin write (i, ' element: '); readln (tab[i]); end ; for i:=size downto 2 do for j:=size downto size+2-i do begin if tab[j-1]<tab[j] then begin tmp:=tab[j]; tab[j]:=tab[j-1]; tab[j-1]:=tmp; end ; end ; writeln ; for i:=1 to size do begin writeln (tab[i],' '); end ; readkey ; end .

Intuicyjny, szybki i dość różniący się system od innych CMS-ów. Otóż edycja strony nie odbywa się w oddzielnym panelu administracyjnym, tylko na stronie właściwej. Za pomocą paska narzędzi, który możemy dowolnie przesuwać na ekranie, dostaniemy się do wszystkich potrzebnych funkcjonalności.  Każda próba edycji, tworzenia czy ustawień, wyświetlana jest w postaci dynamicznego okna. Ten CMS jest dobrym rozwiązaniem dla osób nie mających doświadczenia w budowie stron, gdyż całość przypomina łatwy w edycji dokument.  gpEasy nie potrzebuje do działania bazy MySQL, obsługuje wiele języków i jest rozszerzalny o pluginy oraz szablony. Podgląd:  http://gpeasy.com/Demo Pobierz: https://github.com/oyejorge/gpEasy-CMS/archive/master.zip

Lokboard jest darmowym, open source-owym skryptem forum. Forum to jest lekkie, o dość ograniczonej funkcjonalności, ale przyjazne w użytkowaniu oraz administracji. Posiada wszystko, czego do budowy małego forum potrzeba (np. prywatne wiadomości oraz reputację). Silnik tego skryptu jest młody i cały czas rozbudowywany. W przyszłej wersji będzie można zwiększyć jego możliwości poprzez pluginy. Skrypt obsługuje multijęzyczność. Podgląd:  http://lokboard.net/board/ Download: http://files.klocus.pl/lokboard_1_1_0.zip