Informatika gyűjtemény

Egy szinttel feljebb ta_nsz.cs

2004050607080910

NézetNyomtat

ta_nsz.cs (Vissza)
Az alábbi letöltési lehetőségek közül választhatsz: (segítség)
Karakterkódolás:
Sortörés:
Típus: text/plain
Tartalmaz szöveget
Karakterkódolás: us-ascii
Méret: 877 byte
using System;
using System.IO;

namespace prog_100907
{
    class Program
    {
        public static string megford(string be)
        {
            string ki = "";
            for(int a=be.Length-1;a>=0;a--)
            {
                ki+=be[a];
            }
            return ki;
        }
        public static void Main(string[] args)
        {
            StreamReader sr = new StreamReader("nagyszam.be");
            string[] szam = new string[100];
            string szum = "";
            for(int a=0;a<100;a++)
            {
                szam[a]=sr.ReadLine();
            }
            long maradek = 0, ossz = 0;
            for(int a=49;a>=0;a--)
            {
                ossz=0;
                for(int b=0;b<100;b++)
                {
                    ossz+=long.Parse(Convert.ToString(szam[b][a]));
                }
                ossz+=maradek;
                szum+=Convert.ToString(ossz-ossz/10*10);
                maradek=ossz/10;
            }
            string u2 = megford(Convert.ToString(maradek));
            szum = megford(szum);
            u2+=szum;
            for(int a=0;a<10;a++)
            {
                Console.Write(u2[a]);
            }
            Console.ReadKey(true);
        }
    }
}
(Vissza)