Помогите, пожалуйста

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программка не работает, обновите версию!

Задание 1

begin

 var (a, b, c) := ReadReal3('Длины сторон через пробел:');

 if (a = b) and (a = c) then

   'S = a*a*Sqrt(3)/4,0:f5, h = a*Sqrt(3/4),0:f5'.Println

 else Println('Треугольник неравносторонний')

end.

Задание 2

begin

 case ReadInteger('Введите номер месяца') of

   1, 2, 12: Println('Зима');

   3..5: Println('Весна');

   6..8: Println('Лето');

   9..11: Println('Осень');

 else Println('Ошибка')

 end

end.

Так как в задании целевой язык не указан, написал на C.

Пример работы на рисунке 1.

Предусмотрена обработка ошибок ввода.

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

namespace Задания43

   class Program

       static void Main(string[] args)

           //Задание 1

           double A, B, C;

           Console.WriteLine("Введите 3 стороны:");

           try

               Console.Write("A = "); A = double.Parse(Console.ReadLine());

               Console.Write("B = "); B = double.Parse(Console.ReadLine());

               Console.Write("C = "); C = double.Parse(Console.ReadLine());

            catch

               Console.WriteLine("Ошибка ввода");

               return;

           Console.WriteLine();

           double S, h;

           if(A == B amp;amp; B == C) // Проверка на равносторонность

               S = A * A * Math.Sqrt(3) / 4.0;

               h = A * Math.Sqrt(3 / 4.0);

               Console.WriteLine("Треугольник со стороной одинаковой 0 имеет площадь S = 1 и вышину h = 2", A, S, h);

            else

               Console.WriteLine("Треугольник НЕ равносторонний!");

           Console.WriteLine();

           //Задание 2

           Console.Write("Введите номер месяца: ");

           if(!int.TryParse(Console.ReadLine(), out int N))

               Console.WriteLine("Ошибка ввода");

           string message;

           switch (N)

               case 12:

               case 1:

               case 2:

                   message = "ЗИМА";

                   break;

               case 3:

               case 4:

               case 5:

                   message = "ВЕСНА";

                   break;

               case 6:

               case 7:

               case 8:

                   message = "ЛЕТО";

                   break;

               case 9:

               case 10:

               case 11:

                   message = "ОСЕНЬ";

                   break;

               default:

                   message = "ОШИБКА";

                   break;

           Console.WriteLine(message);