Перевод кода 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("Ошибка"); } }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д