Лабораторная работы3

Лабораторная работы №3
Пастушенко Д.И. Группа: ИП-304
Задание 1
Вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, ... Код
{
int k = 1;
for (int i = 0; i <=9; i++ )
{
k = k + i;
Console.WriteLine("{0}\t{1}\t{2}", k, Math.Pow(k, 2), Math.Pow(k, 3));
};
Console.ReadKey();
}
Программа
Задание 2
Ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры.
Код
{
Console.WriteLine("Введите число");
string s = Console.ReadLine();
long i;
if (Int64.TryParse(s, out i))
{
var rep = s.ToCharArray().ToLookup(c => c).Where(g => g.Count() > 1).ToDictionary(g => g.Key, g => g.Count());
if (rep.Count > 0)
{
Console.WriteLine("Есть одинаковые числа");
foreach (var p in rep)
{
Console.WriteLine("{0} - {1}", p.Key, p.Value);
}
}
else
{
Console.WriteLine("Нет совпадений");
}
}
else
{
Console.WriteLine("Число не введинно");
}
Console.ReadKey(); }
Программа