Pastebin
API
tools
faq
paste
Login
Sign up
SHARE
TWEET
Untitled
SHJordan
Apr 11th, 2016
98
0
Never
Add comment
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!
Pascal
0.20 KB
| None
|
0
0
raw
download
clone
embed
print
report
Program
Pzim
;
var
x
,
y
:
real
;
Begin
readln
(
x
,
y
)
;
while
y
=
0
do
begin
writeln
(
'Divisor inválido, informe um divisor diferente de 0'
)
;
readln
(
y
)
;
end
;
x
:
=
x
/
y
;
writeln
(
x
)
;
End
.
Advertisement
Add Comment
Please,
Sign In
to add comment
Public Pastes
Instant Profits Method
CSS | 2 min ago | 1.01 KB
✅ +12,000$ in 2 days
CSS | 2 min ago | 1.01 KB
✅ +12,000$ in 2 days
CSS | 3 min ago | 0.86 KB
✅ Easiest method for beginners
CSS | 19 min ago | 1.01 KB
BTC SWAP GLITCH
CSS | 19 min ago | 1.01 KB
✅ Instant Profits Method
CSS | 20 min ago | 0.86 KB
Exploit Documentation
CSS | 23 min ago | 1.01 KB
Older node trading
CSS | 23 min ago | 1.01 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the
Cookies Policy
.
OK, I Understand
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!