Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
рекурсия двух функций
var i : integer; function f1(x:integer) : integer; forward; function f2(x:integer) : integer; begin if x > 5 then f2 := f1(x) + 2 else f2 := 3; end; function f1(x:integer) : integer; begin if x < 0 then f1 := f2(x) else f1 := x; end; begin for i := -10 to 10 do writeln(i:3, ' ', f1(i), ' ', f2(i)); end.
run
|
edit
|
history
|
help
0
Урок 6. Задача 1 (1525). Номер самого большого числа
Kupovina Auta
Zadanie 3 a
shift array to left
Opdracht_1
Сумма квадратов чисел = n
help me to fix this stupid thing, so tired about it
practica 3 ejercicio B4
Calculatrice 1.0
1