Перевести 10 строк паскаля в C# (можно C++) - Pascal ABC

Формулировка задачи:

Переведите с паскаля на C# (можно и С++) пожалуйста! Ведро кармы в подарок
program p;
var ol, o1, tmp: real;{111} ll, i1: integer; l1: integer;
begin
readln(o1);
o1:=o1*0.10; {ghbrjk!}
ol:=1;
ll:=1;
l1:=-1;
repeat tmp:=Ol; {временно}
ll:=ll+2;
ol:=tmp+l1/ll;
l1:=-l1;
until abs(ol-tmp)<O1;
writeln(o1*10{маразм}, ol*4,ll)
end.

Код к задаче: «Перевести 10 строк паскаля в C# (можно C++) - Pascal ABC»

textual
float ol, o1, tmp;
            int ll, i1, l1;
            o1 = Convert.ToSingle(Console.ReadLine());
            o1=o1*0.10f;
            ol=1;
            ll=1;
            l1=-1;
            do
            {
                tmp=o1;
                ll=ll+2;
                ol=tmp+l1/ll;
                l1=-l1;
            } while (Math.Abs(ol - tmp) >= o1);
            Console.WriteLine("{0,0},{1,10},{2,10}", (o1 * 10), (ol * 4), ll);  
            Console.ReadLine();

9   голосов, оценка 4.222 из 5


СОХРАНИТЬ ССЫЛКУ