Data update

Task/Trabb-Pardo-Knuth-algorithm/EasyLang/trabb-pardo-knuth-algorithm.easy

@@ -0,0 +1,16 @@
+print "Please enter 11 numbers :"
+n[] = number strsplit input " "
+print ""
+print "Evaluating f(x) = |x|^0.5 + 5x^3 for the given inputs :"
+for i = len n[] downto 1
+   r = sqrt abs n[i] + 5 * pow n[i] 3
+   write "f(" & n[i] & ") = "
+   if r > 400
+      print "Overflow!"
+   else
+      print r
+   .
+.
+# without this section, the input is interactive
+input_data
+10 -1 1 2 3 4 4.3 4.31 4.32 4.32 4.29

Task/Trabb-Pardo-Knuth-algorithm/Elena/trabb-pardo-knuth-algorithm.elena

@@ -5,13 +5,13 @@ public program()
 {
     real[] inputs := new real[](11);
     console.printLine("Please enter 11 numbers :");
-    for(int i := 0, i < 11, i += 1)
+    for(int i := 0; i < 11; i += 1)
     {
         inputs[i] := console.readLine().toReal()
     };
 
     console.printLine("Evaluating f(x) = |x|^0.5 + 5x^3 for the given inputs :");
-    for(int i := 10, i >= 0, i -= 1)
+    for(int i := 10; i >= 0; i -= 1)
     {
         real result := sqrt(abs(inputs[i])) + 5 * power(inputs[i], 3);
 

Task/Trabb-Pardo-Knuth-algorithm/MATLAB/trabb-pardo-knuth-algorithm.m

@@ -0,0 +1,18 @@
+clear all;close all;clc;
+
+% Define the function f(x)
+f = @(x) sqrt(abs(x)) + 5 * x^3;
+
+% Read a line of input, split it into elements, convert to numbers
+inputLine = input('', 's');
+numbers = str2double(strsplit(inputLine));
+
+% Process each number in reverse order
+for i = length(numbers):-1:1
+    value = f(numbers(i));
+    if value > 400
+        fprintf('%g: TOO LARGE\n', numbers(i));
+    else
+        fprintf('%g: %g\n', numbers(i), value);
+    end
+end

Task/Trabb-Pardo-Knuth-algorithm/Wren/trabb-pardo-knuth-algorithm.wren

@@ -1,5 +1,5 @@
 import "io" for Stdin, Stdout
-import "/fmt" for Fmt
+import "./fmt" for Fmt
 
 var f = Fn.new { |x| x.abs.sqrt + 5*x*x*x }