Search
 
SCRIPT & CODE EXAMPLE
 

PASCAL

Pascal (gpc 20070904) sample

program ideone;
var x: integer;
begin
	repeat
		readln(x);
		if x<>42 then writeln(x);
	until x=42
end.
Comment

PREVIOUS NEXT
Code Example
Powershell :: CMD & Powershell History 
Powershell :: Take ownership of a folder 
Powershell :: install python command line windows 
Powershell :: How to test HDD health in PowerShell 
Powershell :: How to save Jira attachments using powershell 
Gdscript :: godot find_node() 
Gdscript :: godot 3d slowly rotate towards object 
Clojure :: ex: Clojure define expected time 
Abap :: the interface between the abap dictionary and the underlying database management system 
Erlang :: erlang exit from shell 
Assembly :: 64 bit assembly Hello world 
Assembly :: set assembly highligh vim 
Assembly :: re optional 
Assembly :: google appscripts cell get background color 
Javascript :: jquery vslidation remove spaces from input 
Javascript :: js on page ready 
Javascript :: open ilnk target js 
Javascript :: refresh window js 
Javascript :: jquery accept only excel file 
Javascript :: check if a variable is undefined jquery 
Javascript :: media query js 
Javascript :: change input placeholder text jquery 
Javascript :: get current url js 
Javascript :: convert to objectid mongoose 
Javascript :: javascript async delay 
Javascript :: javascript refresh page every 30 seconds 
Javascript :: how to change a css variable with javascript 
Javascript :: hide header react navigation 
Javascript :: listing dir by nodejs 
Javascript :: javascript celcius to farenheit 
ADD CONTENT
Topic
Content
Source link
Name
4+8 =