View source for ALGO

{{Short description|Early computer programming language}}
{{about|a programming language|the concept in mathematics and computer science|Algorithm|the term used in financial markets|Algorithmic trading|the cryptocurrency|Algorand (cryptocurrency platform)}}
{{Infobox programming language
| name = ALGO
| paradigm = [[Procedural programming|procedural]], [[Imperative programming language|imperative]], [[Structured programming|structured]]
| family = [[ALGOL]]
| designers =
| developer = [[Bendix Corporation]]
| released = {{Start date and age|1961}}
| typing = [[Static type|static]], [[Strong and weak typing|strong]]
| scope = [[Scope (computer science)|Lexical]]
| programming language = [[Assembly language|Assembly]]
| discontinued = Yes
| platform = [[Bendix G-15]]
| influenced by = [[ALGOL 58]]
| influenced =
}}
'''ALGO''' is an [[algebra]]ic [[programming language]] developed for the [[Bendix G-15]] [[computer]].<ref>{{cite web |url=http://members.iinet.net.au/~dgreen/docs.html |title=The Bendix G-15 General Purpose Digital Computer System |url-status=dead |archive-url=https://web.archive.org/web/20041204060928/http://members.iinet.net.au/~dgreen/docs.html |archive-date=4 December 2004 |access-date=10 July 2020}}</ref>
ALGO was one of several programming languages inspired by the ''Preliminary Report on the International Algorithmic Language'' written in Zürich in 1958. This report underwent several modifications before becoming the Revised Report on which most [[ALGOL]] implementations are based. As a result, ALGO and other early ALGOL-related languages have a very different syntax from [[ALGOL 60]].
== Example ==
Here is the [[TPK algorithm|Trabb Pardo – Knuth algorithm]] in ALGO:
<syntaxhighlight lang="text" line highlight="1-5,9,10">
TITLE TRABB PARDO-KNUTH ALGORITHM
SUBSCript I,J
DATA A(11)
FORMAt FI(2DT), FLARGE(3D)
PROCEDURE F(T=Z)
BEGIN
Z=SQRT(ABS(T))+5*T^3
END
FOR I=0(1)10
A[I]=KEYBD
FOR J=0(1)10 BEGIN
I=J-10
F(A[I]=Y)
PRINT(FI)=I
IF Y > 400
GO TO LARGE
PRINT(FL)=Y
GO TO NEXT
LARGE: PRINT(FLARGE)=999
NEXT: CARR(1) END
2END
</syntaxhighlight>
=== Remarks ===
{{Ordered list
| A title is the only type of comment allowed. Line numbers were inserted by the editor.
| Integer data type. The lower-case letters are not typos, but reflect the way in which ALGO code was presented in the original documentation.
| Only the size of an array can be specified, lower bound is always zero.
| The first format calls for a two-digit number followed by a tab, the second for a three digit number.
| The syntax of ALGO's procedure implementations is slightly different from that given in the Zurich report. Functions as defined by the Zürich report are not implemented.
| item6_value=9 | The syntax here is from the Zürich report and is also consistent with various 1950s-era autocodes.
| KEYBD reads a numeric value from the terminal.}}
== See also ==
{{Wiktionary|algo}}
* [[ALGOL 58]]
* [[ALGOL 60]]
== References ==
{{Reflist}}
== External links ==
*[https://web.archive.org/web/20050131135150/http://www.piercefuller.com/collect/bendix/algo6008.pdf ALGO manual (PDF)]
{{ALGOL programming}}
[[Category:ALGOL 58 dialect]]