Написать программу перевода любого римского числа в десятичную и двоичную систему
177
416
Ответы на вопрос:
Program f1; const n=5; var a: array [1..n] of real; i: integer; s: real; begin for i: =1 to n do readln(a[i]); for i: =1 to n do begin a[i]: =2*sin(i); if a[i]< 0 then s: =s+a[i]; end; writeln('s=',s); for i: =1 to n do writeln(a[i]); end.
Популярно: Информатика
-
Hiitsmi03.05.2021 02:23
-
ktdgegrbyfk16.11.2020 06:36
-
muratovsergej05.08.2021 05:55
-
валера471100903.01.2020 20:25
-
уицилопочтли08.09.2022 22:21
-
Vika5348330.06.2020 20:16
-
0Али200529.01.2022 02:33
-
базлайдер30.10.2021 02:53
-
кар9111.06.2022 16:37
-
нияз3511.09.2021 22:40