Перевод кода Pascal ABC на язык C#
Формулировка задачи:
кто поможет перевести ети коды на язык си шарп. ?
я попытаося перевести но что то не получатся.
вот коды 2-ух программ:
var
s,d,t,r:string;
i,k:integer;
begin
readln (s);
for i:=length(s) downto 1 do
begin
d:=copy(s, i,3);
r:=copy(s, i,2);
if d='ova' then
begin
writeln('женшина')
end;
if r='ov' then
begin
writeln('мужчина')
end;
end;
end.
var
s, d, a, z: string;
i: integer;
begin
readln(s);
for i:=1 to length(s) do
begin
d:=copy(s, i, 1);
if d='@' then
begin
writeln('ошибка')
end;
if d='/' then
begin
writeln('ошибка')
end;
if d='!' then
begin
writeln('ошибка')
end;
if d='$' then
begin
writeln('ошибка')
end;
end;
end.Решение задачи: «Перевод кода Pascal ABC на язык C#»
textual
Листинг программы
using System;
class Program
{
static void Main()
{
string input = Console.ReadLine();
if (input.IndexOfAny(new char[] { '@', '/', '!', '$' }) != -1)
Console.WriteLine("Ошибка");
}
}