На сайте в режиме реального времени публикуются решения контестных задач сервиса Codeforces.
Загружайте свои решения( здесь ) прямо на сайте. Подробнее. Жду ваших решений
 

По разделам

 

Задача Case 12


Элементы окружности пронумерованы следующим образом: 1 — радиус R, 2 — диаметр D = 2·R, 3 — длина L = 2·π·R, 4 — площадь круга S = π·R
2
. Дан номер одного из этих элементов и его значение. Вывести
значения остальных элементов данной окружности (в том же порядке). В
качестве значения π использовать 3.14.

Код (C/C++)

#include <bits/stdc++.h>
 using namespace std;
int main(void)
{
   int n;
   float x,r,d,l,s;
   printf("Номер элемента:") ;
   scanf ("%i", &n);
   printf("Длинна:") ;
   scanf ("%f", &x);
 
   switch (n) {
   case 1:
        r=x;
        d=2*r;
        l=2*3.14*r;
        s=3.14*r*r;
        printf("%f %f %f\n",d,l,s);
        break;
   case 2:
        r=x/2;
        d=x;
        l=2*3.14*r;
        s=3.14*r*r;
        printf("%f %f %f\n",r,l,s);
        break;
   case 3:
        r=x/2*3.14;
        d=2*r;
        l=x;
        s=3.14*r*r;
        printf("%f %f %f\n",r,d,s);
        break;
   case 4:
        r=sqrt(x/3.14);
        d=2*r;
        l=2*3.14*r;
        s=x;
        printf("%f %f %f\n",r,d,l);
        break;
   }
 
   return 0;
}

Код (Python)

import random
import math

r = {1 : "радиус R", 2 : "диаметр D", 3 : "длина L", 4 : "площадь круга S"}
c = []

i = random.randrange(1,5)
#i = 4
print("i : ", i)
N = random.randrange(1,100)
print(r[i],":",N)
if i == 1:
    R = N
    c.append(R)
    c.append(2 * R)
    c.append(2 * math.pi * R)
    c.append(math.pi * R**2)
elif i == 2:
    D = N
    R = D / 2
    c.append(R)
    c.append(D)
    c.append(math.pi * D)
    c.append(math.pi * R**2)
elif i == 3:
    L = N
    R = L / 2 / math.pi
    c.append(R)
    c.append(2 * R)
    c.append(L)
    c.append(math.pi * R**2)
elif i == 4:
    S = N
    R = math.sqrt(S / math.pi)
    c.append(R)
    c.append(2 * R)
    c.append(2 * math.pi * R)
    c.append(S)

print()
print("Элементы окружности:")
for i in range(0,4):
    print(r[i+1],":",c[i])
									

Код (Pascal)

program Case12;
var
 N:Integer;
 X,R,D,L,S:Real;
begin
 Write('Введите номер элемента окружности: ');
 Readln(N);
 Write('Введите длинну элемента окружности: ');
 Readln(X);
 
 Case N of
 1: begin
     R:=X;
     D:=2*R;
     L:=2*3.14*R;
     S:=3.14*sqr(R);
     Writeln(D,L,S);
    end;
 2: begin
     R:=X/2;
     D:=X;
     L:=2*3.14*R;
     S:=3.14*sqr(R);
     Writeln(R,L,S);
    end;
  3: begin
      R:=X/2*3.14;
      D:=2*R;
      L:=X;
      S:=3.14*sqr(R);
      Writeln(R,D,S);
     end;
  4: begin
      R:=sqrt(X/3.14);
      D:=2*R;
      L:=2*3.14*R;
      S:=X;
      Writeln(R,D,L);
     end;
  end;
end.
									




Case. Абрамян
Case 1 Просмотров: 13
Case 2 Просмотров: 14
Case 3 Просмотров: 16
Case 4 Просмотров: 19
Case 5 Просмотров: 9
Case 6 Просмотров: 12
Case 7 Просмотров: 10
Case 8 Просмотров: 18
Case 9 Просмотров: 8
Case 10 Просмотров: 13
Case 11 Просмотров: 16
Case 12 Просмотров: 14
Case 13 Просмотров: 9
Case 14 Просмотров: 13
Case 15 Просмотров: 14
Case 16 Просмотров: 18
Case 17 Просмотров: 15
Case 18 Просмотров: 15
Case 19 Просмотров: 15
Case 20 Просмотров: 9

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться