Projeto Euler – Problema #13

Bem, o problema #13 do projeto Euler é bem simples. Apenas pede os 19 primeiros dígitos da soma de 100 números com 50 dígitos cada um. É só somar todos e pegar os 10 primeiro. Mas como resolver em J?

A=: “.;._2(0 : 0)
37107287533902102798797998220837590246510135740250

53503534226472524250874054075591789781264330331690
)
Ok, criamos uma lista com os 100 números de 50 digitos. Para o resultado é só:
10{.”:x:+/A
Mais um sem graça.
+/ soma todos os elementos da lista, x: torna precisão extendida, “: converte para string, 10{. retorna os 10 primeiros elementos.
Anúncios

Uma opinião sobre “Projeto Euler – Problema #13

  1. Pingback: Projeto Euler – #48 | Fotomix’s Weblog

Os comentários estão desativados.