aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

June 2018 Update

Browse source
This commit is contained in:
Ingy döt Net 2018-06-22 20:57:24 +00:00
parent ba8067c3b7
commit 22f33d4004
5278 changed files with 84726 additions and 14379 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Task/Abstract-type/Julia/abstract-type-1.julia
View file

@ -1,2 +1,2 @@
abstract «name»
abstract «name» <: «supertype»
abstract type «name» end
abstract type «name» <: «supertype» end

12
Task/Abstract-type/Julia/abstract-type-2.julia
View file

@ -1,6 +1,6 @@
abstract Number
abstract Real <: Number
abstract FloatingPoint <: Real
abstract Integer <: Real
abstract Signed <: Integer
abstract Unsigned <: Integer
abstract type Number end
abstract type Real <: Number end
abstract type FloatingPoint <: Real end
abstract type Integer <: Real end
abstract type Signed <: Integer end
abstract type Unsigned <: Integer end

4
Task/Abstract-type/Oforth/abstract-type-1.oforth
View file

@ -1,8 +1,8 @@
Property new: Spherical(r)
Spherical method: radius @r ;
Spherical method: setRadius := r ;
Spherical method: perimeter @r 2 * Pi * ;
Spherical method: surface @r sq Pi * 4 * ;
Spherical method: perimeter @r 2 * PI * ;
Spherical method: surface @r sq PI * 4 * ;
Object Class new: Ballon(color)
Ballon is: Spherical

3
Task/Abstract-type/Oforth/abstract-type-2.oforth
View file

@ -8,4 +8,5 @@
Planete new("Earth", 6371000.0) ->p
System.Out "Earth radius is : " << p radius << cr
System.Out "Earth perimeter is : " << p perimeter << cr
System.Out "Earth surface is : " << p surface << cr ;
System.Out "Earth surface is : " << p surface << cr
;