3-2
4-4
5-1
Отметь как лучший, если не лень:) Бобра))
Язык C++.
#include <iostream>
using namespace std;
int main () {
float a, b, c, p;
cout << "Введите стороны треугольника: " << endl;
cin >> a >> b >> c;
if (a + b > c && a + c > b && b + c > a) {
cout << "Периметр треугольника: " << a+b+c << endl;
}
else {
cout << "Треугольник не существует." << endl;
}
}
Может, потому что ведь он же знаком с ним и должен знать.
<h3>PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var Число := ReadInteger('Введите натуральное число:');
var (Четных, Нечетных) := (0, 0);
while Число > 0 do
begin
if (Число mod 10).IsOdd then Inc(Нечетных)
else Inc(Четных);
Число := Число div 10
end;
Println('Нечетных', Нечетных, 'четных', Четных)
end.
<h2>Введите натуральное число: 1406439</h2><h2>Нечетных 3 четных 4 </h2>