Конвертировать с Pascal на C# - C# (183214)
Формулировка задачи:
Конвертировать с Pascal на C# программу ниже
var x, max7, max, R, R1, count: integer; begin max:= 0; max7:= 0; count:= 0; while True do begin read(x); if x = 0 then break; Inc(count); if (x mod 7 = 0) and (x mod 49 <> 0) and (x > max7) then max7:= x; if (x mod 7 <> 0) and (x > max) then max:= x; end; read(R); R1:= max7*max; if R1 = 0 then R1:= 1; writeln('Введено чисел: ', count); writeln('Контрольное значение: ', R ); writeln('Вычисленное значение: ', R1); if R1 = R then writeln('Значения совпали') else writeln('Значения не совпали') end.
Решение задачи: «Конвертировать с Pascal на C#»
textual
Листинг программы
using System; namespace CodeConversion { public class CSharpFromPascal { public static void Main(string[] args) { int x = 0, max = 0, max7 = 0, R = 0, R1 = 0, count = 0; while (true) { x = int.Parse(Console.ReadLine()); if (x == 0) break; count++; if (((x % 7) == 0) && ((x % 49) != 0) && (x > max7)) { max7 = x; } if (((x % 7) != 0) && (x > max)) { max = x; } } R = int.Parse(Console.ReadLine()); R1 = max7 * max; if (R1 = 0) R1 = 1; Console.WriteLine("Введено чисел: {0}", count); Console.WriteLine("Контрольное значение: {0}", R); Console.WriteLine("Вычисленное значение: {0}", R1); if (R1 == R) Console.WriteLine("Значения совпали"); else Console.WriteLine("Значения не совпали"); } } }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д