Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Procedimientos Leer - Poblar - Mostrar
procedure leerTotalEdades(var num : integer; minimo, maximo : integer); begin repeat read(num); until (num >= minimo) and (num <= maximo); end; procedure poblarVector(var v_edades : vector; num : integer); var aux : integer; begin for aux:= 1 to num do read(v_edades[aux]); end; procedure mostrarVector(v_edades : vector; num : integer); var aux : integer; begin write('Edades en el vector = '); for aux:= 1 to num do if aux=1 then write(v_edades[aux]) else write(' , ',v_edades[aux]); end;
run
|
edit
|
history
|
help
0
For6
the answer is the last result
Урок 3 задача 1 (1484) повышенная сложность.
AR sredine
Typecast an array to other type
formato_real
Prvi zadatak vezbe pokazivaci
busca de string
Project Euler 20 - Factorial digit sum
test28