Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
nombre_completo
//fpc 3.0.0 program nombre_completo; var nom, ap, completo: string; i_nom, i_ap, iniciales : string; largo : integer; begin readln(nom); readln(ap); largo := length(ap); completo := nom + ap; writeln(completo); writeln('su apellido tiene ',largo,' letras'); i_nom := copy(nom,1,1); i_ap := copy(ap,1,1); iniciales := i_nom + i_ap; writeln('sus iniciales son ',iniciales); end.
run
|
edit
|
history
|
help
0
solar_system_n_(20)_planets_an_time
two number sum
gg
programme 1
nested for loop a(iii)
practica 3 ejercicio B4
Quadratic equation
1
3
Primo1