0 / 0 / 0
Регистрация: 25.10.2019
Сообщений: 18
1

Перевод из Паскаля в С#

25.12.2019, 14:36. Показов 443. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const eps=1e-6;
var
  s,s1:real;
  n:uint64;
  t:integer;
begin  
  n:=1;
  t:=1;
  s:=0.0;
  repeat
    s1:=s;
    s:=s+t/n;
    n:=n+2;
    t:=-t;
  until abs(s-s1)<=eps;
  writeln(n,':',s,':',pi/4);
end.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.12.2019, 14:36
Ответы с готовыми решениями:

Перевод кода с Паскаля (перевод в метры)
var a,b,d:integer; c,e:real; begin writeln('1-дециметр 2-километр'); writeln('3-метр ...

Перевод из Паскаля на С++
var CarDoor: integer; SelectedDoor: integer; RevealedDoor: integer; i: integer;...

Перевод с паскаля
var x,y:real; o1,o2,o3:boolean; begin Readln(x,y); o1:=(y&lt;=7) and (y&gt;=1) and...

Перевод из Паскаля в Си++
program p1; var a,k:string; mas:array of string; b,c,i,nu:integer; begin nu:= 0;...

1
47 / 29 / 18
Регистрация: 24.12.2019
Сообщений: 65
27.12.2019, 16:30 2
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
  
            const float eps = 1e-6F;
            double s = 0.0, s1;
            long n = 1L;
            int t = 1;
            do
            {
                s1 = s;
                s = s + t / n;
                n += 2;
                t = -t;
 
            } while (Math.Abs(s -  s1) <= eps);
 
            Console.WriteLine($"{n} : {s} : {Math.PI / 4}");
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.12.2019, 16:30
Помогаю со студенческими работами здесь

Перевод из Паскаля в С
uses crt; var a,b,c,d:byte; begin clrscr; repeat writeln('Положение коня:');...

Перевод из Паскаля в C/C++
Перевести Все программы в файле

Перевод с Паскаля в си
Всем привет! Прошу , пожалуйста помогите этот замечательный код перевести в си язык. const n...

Перевод с паскаля на с#
Program Insert; const N=10; type Element = integer; Arr = array of...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru