Наводнение продолжалось ровно сутки. в первый час вода в реке поднялась на 1 дюйм, во второй на 2, в третий на 3, и т.д. на сколько дюймов поднимется уровень воды за сутки. (дана программа вычисления суммы 24 членов ряда: 1+2+3++n) сделайте простенькую программу для уровня 9 класса. паскаль

Первый вариант
begin 
for var i:=1 to 24 do 
begin   
writeln('Вода поднялась на ',i,' дюйм'); 
end;  
end.

Второй
Program kry;
var i:integer;
begin 
while i<24 do begin   
i:=i+1;   
writeln('Вода поднялась на ',i,' дюйм'); 
end;  
end.

using System;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int A, B, C, tmp;

           Console.Write("Введите A: ");

           A = Convert.ToInt32(Console.ReadLine());

           Console.Write("Введите B: ");

           B = Convert.ToInt32(Console.ReadLine());

           Console.Write("Введите C: ");

           C = Convert.ToInt32(Console.ReadLine());

           tmp = A;

           A = C;

           C = B;

           B = tmp;

           Console.WriteLine("Новые значения:");

           Console.WriteLine("A = " + A);

           Console.WriteLine("B = " + B);

           Console.WriteLine("C = " + C);

       }

   }

}

using System;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int A, B, C, tmp;

           Console.Write("Введите A: ");

           A = Convert.ToInt32(Console.ReadLine());

           Console.Write("Введите B: ");

           B = Convert.ToInt32(Console.ReadLine());

           Console.Write("Введите C: ");

           C = Convert.ToInt32(Console.ReadLine());

           tmp = A;

           A = C;

           C = B;

           B = tmp;

           Console.WriteLine("Новые значения:");

           Console.WriteLine("A = " + A);

           Console.WriteLine("B = " + B);

           Console.WriteLine("C = " + C);

       }

   }

}