Либо перезагрузи либо переустанови WINDOWS
Var
a, f, t, S: real;
begin
Write('Введите длину стороны ромба: '); Readln(a);
Write('Введите величину острого угла ромба в градусах: '); Readln(f);
t := f * pi / 180;
S := sqr(a) * sin(t);
Writeln('Площадь ромба равна ', S, ' кв.ед.')
end.
Тестовое решение:
Введите длину стороны ромба: 14.3
Введите величину острого угла ромба в градусах: 58.7
Площадь ромба равна 174.728286173858 кв.ед.
1Гб содержиться 1024Мб
2*1024:3=683,82
Ответ: 682.
Пиши дано и что дано в задачах решение дили
Ответ:
print("кол-во купе")
n = int(input()) #купе
a = [] #места
print ("кол-во одиночек")
one = int(input())
print ("кол-во двоек")
two = int(input())
print ("кол-во троек")
three = int(input())
for i in range(n):
k=0
print ("Кол-во мест в",i+1," купе:")
while k<1 or k>4:
k=int(input())
if(k<1 or k>4):
print("Число мест от 1 до 4!!!")
a.append(k)
l = 0
for i in range(len(a)):
if a[i]>=3:
l = l+1
a[i] = a[i]-3
if l == three:
break
print(l,"тройки")
print(a)
j = 0
for i in range(len(a)):
if a[i]>=2:
j = j+1
a[i] = a[i]-2
if j == two:
break
print(j,"двойки")
print(a)
m = 0
for i in range(len(a)):
if a[i]>=1:
m = m+1
a[i] = a[i] - 1
if m == one:
break
print(m,"одиночки")
print(a)
if l>=three and j>=two and m>=one:
print("YES")
else:
print("NO")
Объяснение:
надеюсь в коде разберешься )
написано в питоне