#include <iostream>
#include <cmath>
#include <locale.h>
using namespace std;
int main(int argc, char **argv)
{
setlocale(0, "Russian");
int a, b, c;
double p, res;
cout << "Введите длины сторон треугольника:"<<endl;
cin >> a >> b >> c;
if (a + b > c && a + c > b && b + c > a) {
p = (a + b + c) / 2.0;
res = sqrt(p * (p - a) * (p - b) * (p - c));
cout << "Площадь треугольника: "<< res <<endl;
}
else
cout << "Невозможно вычислить площадь!" <<endl;
return 0;
}
l1=input('Введите элементы массива через пробел ').split()
l2=[]
for i in range(len(l1)):l2.append(l1[i])
c=0
for i in range(len(l1)):
if str(l1[i]).count('1')==0 and str(l1[i]).count('3')==0 and str(l1[i]).count('5')==0 and str(l1[i]).count('7')==0 and str(l1[i]).count('9')==0:
l1[i]=max(l1)
c+=1
print('Старый массив: ')
for i in range(len(l2)):print(l2[i],end=' ')
print('\nНовый массив: ')
for i in range(len(l1)):print(l1[i],end=' ')
print('\nКоличество замен: ')
if c !=0:print(c)
else:print('замен не было')
Объяснение:
//Пусть f(x)=10x-x^2
//PascalABC.Net 3.2
function f(x:real):=10*x-sqr(x);
begin
write ('f(x)=', f(readreal('Введите x: ')));
end.