# prova
{cat( "a", "\t", "h", "\t", "s", '\n' ); a <- 100; h <- 0;
 while(h<=100) {cat( a, "\t", h, "\t", sqrt(a^2+h^2), '\n' ); h = h+5} }