Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
урок 13 пример 3 параметры по значению и параметры переменные
var a, b : integer; procedure ab( a : integer; var b : integer); begin a := a + 1; b := b + 1; writeln(a, ' ', b) end; begin a := 1; b := 2; ab( a + 2, b); ab( b, a ); writeln(a, ' ', b); end.
run
|
edit
|
history
|
help
0
Shuffle number array
solar_system_n_(20)_planets_an_time
practica 3 ejercicio 4
digits_count
test23
Kupovina Auta
Пиріжки
practica 7 ejercicio 10
Record as a procedure argument
SINHNHIPHAN