Hebraic Style
Publicado por Danillo Souza (última atualização em 03/11/2009)
[ Hits: 3.770 ]
Lê a quantidade de linhas informada e as escreve alinhadas a direita na tela para visualização e grava em um arquivo com essa mesma formatação.
Esse era um dos exercícios de uma maratona de programação, não lembro de onde, mas na maratona era pra ser feito em C.
#! /usr/bin/perl my @a; print "Escrever quantas linhas?: "; $ln = <STDIN>; chomp $ln; system "clear"; open(A, ">>hebraic.txt"); for ($i = 0 ; $i < $ln ; $i++) { $x = <STDIN>; push(@a, $x); system "clear"; foreach $y (@a) { my $c = length $y; print " " x (80 - $c) . $y; } } foreach (@a) { my $c = length $_; print A " " x (80 - $c) . $_; } close(A); exit;
MyBF - Interpretador de BrainFuck
Nenhum coment�rio foi encontrado.
Comparação entre os escalonadores BFQ e MQ-Deadline (acesso a disco) no Arch e Debian
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Overclocking Permanente para Drastic no Miyoo Mini Plus
Problemas de chaves (/usr/share/keyrings) no Debian
Converter os repositórios Debian para o novo formato com as chaves
aonde eu encontro prefix do mu online ou mu dark epoch, wine, port-pro... (1)
aonde eu encontro prefix do mu online ou mu dark epoch, wine, port-pro... (1)
aonde eu encontro prefix do mu online ou mu dark epoch, wine, port-pro... (1)