-
writeln("Result: ", result); // Result: 15 // p****ing a
delegate literal result = reduce!((a, b) => (b <= pivot) ? a + b : a)(chain(a1, a2));
writeln("Result:...
- ───────────────────────
begin // Note the
different data types.
writeLn(f(3));
writeLn(f(3.0)); end.
Delphi permits default parameters. In Pascal, if the...
-
following Pascal code
writes the two
words on
sequential lines:
writeln('Foo'); write('Bar');
writeln outputs a
newline after the
parameter text,
while write...
- T****oWorld =
object procedure Put; end;
procedure T****oWorld.Put;
begin WriteLn('****o, World!'); end; var ****oWorld: T****oWorld; {
allocated on the...
-
stdio :
writeln;
alias twice = (f) => (int x) => f(f(x));
alias plusThree = (int i) => i + 3; void main() { auto g = twice(plusThree);
writeln(g(7)); //...
- file-executable? (directory-files dir #t)))) (define (
writeln x) (display x) (newline)) (for-each
writeln (append-map
executables ((infix-splitter ":") (getenv...
- commands.
while a <> b do
WriteLn('Waiting'); if a > b then
WriteLn('Condition met') {no
semicolon allowed before else} else
WriteLn('Condition not met');...
- > 0 do
begin b1 := s[b1]; l := l - 1 end; base := b1 end {base};
begin writeln('
start pl/0'); t := 0; b := 1; p := 0; s[1] := 0; s[2] := 0; s[3] := 0;...
- for the
simple types var x:integer=100; s:string;
begin s:= x.ToString;
writeln(s); end. "7.2.
Unboxed types and
primitive operations". downloads.haskell...
- TGenericclass<Integer>.Create; GC2 := B.TGenericclass<String>.Create;
WriteLn(GC1.Foo(100)); // 200
WriteLn(GC2.Foo('****o')); // ****o****o GC1.Free; GC2.Free; end...
