Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
y
var n, s: integer; begin n :=0; s :=100; while s > 0 do begin s := s - 15; n := n + 2; end; writeln(n); end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Prosti brojevi praktikum nizovi
XEPBAN
Elevador Versão Pascal StringList
TanTai11A2@
Huong11a2@
write
zadan 2
practica 3 ejercicio B5
Huong11a2@
бассейн
Please log in to post a comment.