Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
formato_real
program formato_real; (* N:M ==> N posiciones en total - con M decimales *) (* si el número es más grande que la anchura indicada *) (* no se "parte" ... se escribe completo. *) (* Si es menor, se rellena con espacios por la izquierda. *) (* Los decimales se redondean al número de posiciones indicado *) var num: real; begin num := 9234.56789; writeln('----x----x----x----x----x----x'); writeln(num); (* el formato por defecto es exponencial *) writeln(num:15:3); (* Con tres decimales *) writeln(num:8:2); (* Con dos decimales *) writeln(num:4:1); (* Con un decimal *) writeln(num:2:0); (* Sin decimales *) writeln(num:12); (* ¿Qué hará ahora? *) writeln(num:6); writeln('----x----x----x----x----x----x'); end. (* num := 56.789765 ; writeln(num); writeln(num:1); writeln(num:30); end. *) (* si se indica formato pero no decimales *) (* se utiliza notación exponencial *) (* pero lo más compacta posible *) (* intentando cumplir con lo especificado *) (* --------------------------------------- *)
run
|
edit
|
history
|
help
0
Урок 3, задача 6 (1479). Без циклов
Урок 2. Функции: abs, round, trunc, int, frac
вывод строк символов
solar_system_array_n_planets
test27
Opdracht_1
Huong11a2@
JohnnyHCao
подсчёт кратчайших путей
Pokazivaci, ulancane liste