Перевести с Pascal на С# - C#
Формулировка задачи:
Помогите перевести код на C#
Var A:array[1..100] of integer;
i,n,k,max:byte;
Begin
write('Введите n: ');readln(n);
For i:=1 to n do
Begin
write('A[',i,'] = ');
readln(A[i]);
End;
max:=0;k:=0;
For i:=1 to n do
Begin
if A[i] mod 2 = 1 then inc(k)
else
Begin
if k>max then max:=k;
k:=0;
end;
End;
if k>max then max:=k;
if max>0 then writeln('Max последовательность из нечетных элементов = ',max)
else writeln('Нет последовательности нечетных элементов');
End.Решение задачи: «Перевести с Pascal на С#»
textual
Листинг программы
using System;
class Program
{
static void Main()
{
byte n, k, max;
Console.Write("Введите n: ");
n = byte.Parse(Console.ReadLine());
int[] A = new int[n];
for (int i = 0; i < n; i++)
A[i] = int.Parse(Console.ReadLine());
max = k = 0;
for (int i = 0; i < A.Length; i++)
if (A[i] % 2 == 1)
k++;
else if (k > max)
{
max = k;
k = 0;
}
if (k > max) max = k;
if (max > 0) Console.WriteLine("Max последовательность из нечетных элементов = {0}", max);
else Console.WriteLine("Нет последовательности нечетных элементов.");
Console.ReadKey();
}
}