Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
1
var n , s: integer; begin n:=0; s:=1000; while s>=100 do begin s:=s-2; n:=n+1; end; write (n) end.
run
|
edit
|
history
|
help
0
nombre_completo
practica 9 ejercicio 4
practica 2 ejercicio 5
TanTai11A2@
Tableau
y
practica 7 ejercicio 4
Huong11a2@
Урок 3 задача на вывод 1 и 0 как функция целого
9