Определить, является ли текст шестнадцатеричной записью числа, кратного 5 (перевод с Pascal) - C#
Формулировка задачи:
var
b:set of char;
a:string;
c,sum,i,f:integer;
begin
b:=['0'..'9','A'..'F'];
readln (a);
for i:=1 to length(a) do
if not(a[i] in b) then f:=1;
if f=0 then begin
for i:=1 to length(a) do
begin
c:= ord(a[i]);
if c>57 then c:=c-55 else c:=c-48;
sum:=sum+c;
end;
if sum mod 5=0 then writeln('yes')else f:=1;
end;
if f=1 then writeln('no');
readln;
end.Решение задачи: «Определить, является ли текст шестнадцатеричной записью числа, кратного 5 (перевод с Pascal)»
textual
Листинг программы
string hexString = "7B2";
int num = Int32.Parse(hexString, System.Globalization.NumberStyles.HexNumber);
Console.WriteLine(num);
if(num%5==0)System.Console.WriteLine("{0} - кратно 5.",num);
Console.ReadKey();