gitea-mirror/basic-computer-games
1
0
Fork 0
mirror of https://github.com/coding-horror/basic-computer-games.git synced 2026-01-08 03:12:26 -08:00
Code Issues Packages Projects Releases Wiki Activity

MAINT: Apply pre-commit

Browse Source 
Remove byte-order-marker pre-commit check as there would be
many adjustments necessary
This commit is contained in:
Martin Thoma
2022-03-05 09:29:23 +01:00
parent f5e33ae38f
commit e64fb6795c
536 changed files with 6267 additions and 5556 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
61_Math_Dice/pascal/README.md
View File

@@ -5,11 +5,10 @@ Conversion to [Pascal](https://en.wikipedia.org/wiki/Pascal_(programming_languag
##### Translator Notes:
I tried to preserve as much of the original layout and flow of the code
as possible. I added a procedure for the printing of the die-face; and
another to read an integer from the player, as I was unhappy with the runtime
another to read an integer from the player, as I was unhappy with the runtime
error message spat out when a non-number is given to readln(<integer>).
I was torn between using the correct singular term "die" instead of "dice".
I was torn between using the correct singular term "die" instead of "dice".
In the end I used a (poor?) combination of both.
krt@krt.com.au 2020-10-12

7
61_Math_Dice/pascal/mathdice.pas
View File

@@ -20,7 +20,7 @@ begin
else
writeln( 'I * * I' );
if ( ( face_value = 2 ) or ( face_value = 4 ) ) then
if ( ( face_value = 2 ) or ( face_value = 4 ) ) then
writeln( 'I I' )
else if ( face_value = 6 ) then
writeln( 'I * * I' )
@@ -33,7 +33,7 @@ begin
writeln( 'I * I' )
else
writeln( 'I * * I' );
writeln( ' ----- ' );
end;
@@ -61,7 +61,7 @@ begin
input_error := 1;
while ( input_error <> 0 ) do
begin
readln( player_input );
readln( player_input );
val( player_input, player_answer, input_error );
@@ -126,4 +126,3 @@ begin
writeln( 'THE DICE ROLL AGAIN...' );
end;
end.