Category Archives: Uncategorized

scale=90 for (e = n = f = 1; f != 0; f /= ++n) e += f e

Palindromic primes 20 FOR N=2 TO 100000 30 I=N 35 J=0 40 J=J*10+I-INT(I/10)*10 43 I=INT(I/10) 47 IF I>0 THEN 40 50 IF J<>N THEN 80 52 IF N=2 THEN 75 60 FOR I=2 TO SQR(N) 65 IF N-INT(N/I)*I=0 THEN 80 … Continue reading →

Palindate #! /bin/bash is_palyndrom_date() { date -d “$1” 1>/dev/null 2>&1 && echo “$1” ; } for _H in {2..9}; do for _I in {0..9}; do for _J in {0..99}; do is_palyndrom_date ${_H}${_I}`printf “%02d%s” ${_J}`-`printf “%02d%s” ${_J} | rev`-`printf “%02d%s” ${_H}${_I} | … Continue reading →

Shuffle and deal four hands of five cards each with #Python #!/usr/bin/python3 import random deck = [ ‘🂡’,’🂢’,’🂣’,’🂤’,’🂥’,’🂦’,’🂧’,’🂨’,’🂩’,’🂪’,’🂫’,’🂭’,’🂮’, ‘🂱’,’🂲’,’🂳’,’🂴’,’🂵’,’🂶’,’🂷’,’🂸’,’🂹’,’🂺’,’🂻’,’🂽’,’🂾’, ‘🃁’,’🃂’,’🃃’,’🃄’,’🃅’,’🃆’,’🃇’,’🃈’,’🃉’,’🃊’,’🃋’,’🃍’,’🃎’, ‘🃑’,’🃒’,’🃓’,’🃔’,’🃕’,’🃖’,’🃗’,’🃘’,’🃙’,’🃚’,’🃛’,’🃝’,’🃞’ ] random.shuffle(deck) for i in range(0, 20, 5): print(” “.join(deck[i:i+5]))

Highlight consecutive duplicated words with Perl perl -pe ‘s/\b(\w+)\s+\1\b/\e[31m$&\e[0m/gi’ gettysburg.txt

Factorial primes with gawk #! /usr/bin/gawk -f function isprime(n, i) { if(n==2)return 1 if(n<2||n%2==0)return 0 for(i=3;i*i<=n;i+=2) if(n%i==0)return 0 return 1 } BEGIN { for(x=i=1;z<10;i++){ x*=i if(isprime(x-1)){z++;print i”! – 1 = “x-1} if(isprime(x+1)){z++;print i”! + 1 = “x+1} } } The … Continue reading →

Trig functions #! /usr/bin/bc -l define t(x) { return s(x) / c(x) } define y(y) { if (y == -1) return -2 * a(1) /* -pi/2 */ if (y == 1) return 2 * a(1) /* pi/2 */ return a(y … Continue reading →

With Python find words longer than 10 characters that use all the vowels: #! /usr/bin/env python3 with open(‘unixdict.txt’) as f: while (line := f.readline().strip()): if (len(line) > 10 and all( line.count(c) == 1 for c in ‘aeiou’)): print(line)

Number to words #!/usr/bin/env python3 import sys n = int(sys.argv[1]) ones = [“zero”, “one”, “two”, “three”, “four”, “five”, “six”, “seven”, “eight”, “nine”] teens = [“ten”, “eleven”, “twelve”, “thirteen”, “fourteen”,”fifteen”, “sixteen”, “seventeen”, “eighteen”, “nineteen”] tens = [“”, “”, “twenty”, “thirty”, “forty”,”fifty”, … Continue reading →

Archimedes spiral with turtle graphics #!/usr/bin/env python3 from turtle import * from math import * color(“blue”) speed(0) down() for i in range(200): t = i*pi/20 r = 1+5*t goto(r*cos(t), r*sin(t)) done()