MP: Sourcecode-Highlighting (Forum Matroids Matheplanet)

#include <stdio.h> #define MAXLENGTHSTR 255 int main(void) { /* Deklaration der Variablen */ int ein1, ein3, aus; char ein2; char s1[MAXLENGTHSTR]; /* Usereingabe */ printf("Eingabe: "); flushall(); gets(s1); /* Interne Verarbeitung des Input */ sscanf(s1, "%d %c %d", &ein1, &ein2, &ein3); aus = 0; /* Berechnung */ switch(ein2) { case '+': aus = ein1 + ein3; break; /* Addition */ case '-': aus = ein1 - ein3; break; /* Subtraktion */ case '*': aus = ein1 * ein3; break; /* Multiplikation */ case '/': aus = ein1 / ein3; break; /* Division */ case '%': aus = ein1 % ein3; break; /* Modulo */ default: printf(" Input error!\n"); break; } /* Ausgabe */ printf("Ergebnis: %d\n", aus); /* Ende */ return 0; }

D = imread('Pfadangabe.jpg'); 
imagesc(D) 

%Header wird eingefügt 
fid3 = fopen(['D:\\Cybex\\Header' file(i).name_new_R '_Header_63.asc'],'wt'); 
printf(fid3,'%s \t %s \t %s \t %s\n','#Time','#Trig','#Win','#Tor') 
    
%speichert Time, Trigger, Winkel, Torque, Rate, MFs 
fprintf(fid3,'%f \t %f \t %f \t %f \t %f \t %f \t %f \t %f\n',MF_60_30'); 

ft2 = [matlabroot '/work/emma/leitung/' fn2 '.txt']; 
[X Y] = textread(ft2, '%d MHz - %f %*s'); 
X= X(1:end,1)*1000000; 
P = interp1(X, Y, linspace(min(X),max(X))); 

sz=size(fd); 

for k=1:sz(1,1)-1     
    x = (fd(k,2)-fd((k+1),2)); 
    y = (fd(k,3)-fd((k+1),3)); 
    
    head(k,:) = (x,y) 
end 
    panalyse = uicontrol(fh,'Style','PushButton',... 
                         'Units','normalized',... 
                         'Position',[X+j*AbstandX Y-k*AbstandY laenge hoehe],..
                         'String','Analysieren',... 
                         'ToolTipString','Analysiert die simulierten Daten',...
                         'CallBack','analyse(par1,par2,...)',... 
                         'Tag','Analyse'); 

X1=X(1); 
X2=X(end); 
X3=X1:X2; 
X4=X1:.25:X2;  % Denke hier kann ich die Genauigkeit angeben 
% für Y sind ja soviele Werte eingelesen wie Zeilen vorhanden D = imread('Pfadangabe.jpg'); 
imagesc(D) 
 
%Header wird eingefügt 
fid3 = fopen(['D:\\Cybex\\Header' file(i).name_new_R '_Header_63.asc'],'wt'); 
printf(fid3,'%s \t %s \t %s \t %s\n','#Time','#Trig','#Win','#Tor') 
 
%speichert Time, Trigger, Winkel, Torque, Rate, MFs 
fprintf(fid3,'%f \t %f \t %f \t %f \t %f \t %f \t %f \t %f\n',MF_60_30'); 
 
ft2 = [matlabroot '/work/emma/leitung/' fn2 '.txt']; 
[X Y] = textread(ft2, '%d MHz - %f %*s'); 
X= X(1:end,1)*1000000; 
P = interp1(X, Y, linspace(min(X),max(X))); 
 
sz=size(fd); 
 
for k=1:sz(1,1)-1     
    x = (fd(k,2)-fd((k+1),2)); 
    y = (fd(k,3)-fd((k+1),3)); 
 
    head(k,:) = (x,y) 
end 
    panalyse = uicontrol(fh,'Style','PushButton',... 
                         'Units','normalized',... 
                         'Position',[X+j*AbstandX Y-k*AbstandY laenge hoehe],..
                         'String','Analysieren',... 
                         'ToolTipString','Analysiert die simulierten Daten',...
                         'CallBack','analyse(par1,par2,...)',... 
                         'Tag','Analyse'); 
 
X1=X(1); 
X2=X(end); 
X3=X1:X2; 
X4=X1:.25:X2;  % Denke hier kann ich die Genauigkeit angeben 
% für Y sind ja soviele Werte eingelesen wie Zeilen vorhanden

class ArrayTest { public static void manipuliere(String[] s) { if (s != null) s[0] = "Hallo"; } public static void manipuliere_nix(String[] s) { String[] neu = { "HUHU", "IHR" }; s = neu; } public static void main(String[] args) { String[] strings = { "hallo", "Welt" }; manipuliere(strings); for (String s: strings) System.out.println(s); manipuliere_nix(strings); for (String s: strings) System.out.println(s); } }

#!/bin/bash multiply () # multipliziert die uebergebenen Parameter { # Anzahl der Parameter ist variabel local product=1 until [ -z "$1" ] # Until nutzt den ersten uebergebenen Parameter ... do let "product *= $1" shift done echo $product # wird nicht auf STDOUT ausgegeben, } # wenn es an eine Variable uebergeben wird mult1=15383; mult2=25211 val1=`multiply $mult1 $mult2` echo "$mult1 X $mult2 = $val1" # 387820813

function so_sth(terms){ terms = terms.replace(/\"/g,""); var terms_split = terms.split(' '); var c = 0; for(var i=0; i<terms_split.length; i++){ term = terms_split[i]; if(term=='') continue; term = term.replace(/\$/g," "); } }

# # Extracting information from the file ... # paper = open(sys.argv[1]); authorcount = 0; author = {}; abstract = ''; for line in paper: if len(re.compile('\\\\title').findall(line)) > 0: title = re.compile('\\\\title\[[\s\S]*\]{([\s\S]*)}\n').sub('\\1', line); if len(re.compile('\\\\keywords').findall(line)) > 0: keywords = re.compile('\\\\keywords{([\s\S]*)}\n').sub('\\1', line); if len(re.compile('\\\\subjclass').findall(line)) > 0: msc = re.compile('\\\\subjclass\[2000\]{([\s\S]*)}\n').sub('\\1', line); if len(re.compile('\\\\author').findall(line)) > 0: author[authorcount] = re.compile('\\\\author\\[[\s\S]*\\]{([\s\S]*)}\n').sub('\\1', line); author[authorcount] = re.compile('\\\\"u', re.VERBOSE).sub('ü', author[authorcount]); authorcount = authorcount + 1; if len(re.compile('\\\\begin{abstract}').findall(line)) > 0: for line in paper: if len(re.compile('\\\\end{abstract}').findall(line)) > 0: break; abstract = abstract + line; paper.close();

\documentclass[a4paper, 12pt]{article} \usepackage[T1]{fontenc} \usepackage[latin1]{inputenc} \usepackage{ngerman} \setlength{\parindent}{0em} \begin{document} Die Simpsonregel ist auch unter dem Namen Keplersche Fassregel bekannt. Johannes Kepler konnte damit eine sehr gute Näherung zur Berechnung des Volumens von Fässern angeben. Dazu betrachtete er ein Fass als ein Rotationsparaboloid. Dann ergibt sich dass Fassvolumen als $$V = \pi \int_0^H \varphi(x) \, \textnormal{d}x$$ wobei $\varphi$ eine Parabel beschreibt, die die Fassdauben möglichst gut approximiert. $H$ ist hier die Höhe des Fasses. Da die Keplersche Fassregel für Polynome 2. Grades exakt ist, gilt also $$V = H \pi \left(\frac{1}{6}\varphi(0) + \frac{4}{6}\varphi(\frac{H}{2}) + \frac{1}{6}\varphi(H)\right)$$ \end{document}

actionscript
ada
apache
applescript
asm
asp
autoit
bash Synonyme: sh shell ksh
blitzbasic
bnf
c
c_mac
caddcl
cadlisp
cfdg
cfm
cpp-qt
cpp Synonyme: c++
csharp Synonyme: c#
css
d
delphi
diff
div
dos
eiffel
fortran
freebasic
gml
groovy
haskell
html4strict Synonyme: html
idl
ini
inno
io
java5 Synonyme: java
javascript
latex
lisp
lua
matlab
mirc
mpasm
mysql
nsis
objc
ocaml-brief
ocaml
oobas
oracle8
pascal
perl
php-brief
php
plsql
python
qbasic Synonyme: basic
rails
reg
robots
ruby
sas
scheme
sdlbasic
smalltalk
smarty
sql
tcl
text
thinbasic
tsql
vb
vbnet
vhdl
visualfoxpro
winbatch
xml
xpp
z80