Var a,b,c,p: Real;
begin
writeln('Введите a,b,c,p');
readln(a,b,c,p);
writeln('S=',sqrt(p*(p-a)*(p-b)*(p-c)));
end.
Язык С++.
#include <iostream>
using namespace std;
int main() {
int a, b, c;
cin >> a >> b >> c;
if(a + b > c && a + c > b && b + c > a){
if (a == b && a == c && b == c) {
cout << "Равносторонний." << endl;
}
else if (a == b || a == c || b == c) {
cout << "Равнобедренный." << endl;
}
else {
cout << "Разносторонний." << endl;
}
}
else
cout << "Треугольник не существует." << endl;
}
На каждом шаге программы происходит
x=2 y=1 (начальные данные)
x=4 y=2
x=8 y=3
x=16 y=4
т.е ответ 2
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
ReadSeqInteger(ReadInteger)
.Where(t->(t mod 3=0) and (Abs(t) mod 10=9)).Println
end.
В5
В-это 11,значит, В5=11*16^1+5*16^0=176+5=181
Число в нулевой степени равно 1, поэтому 16^0=1
А28
А-это 10, значит,
А5=10*16^2+2*16^1+8*16^0=2600
CD- это 12 и 13 соответственно, значит, CD=12*16^1+13*16^0=192 +13 = 205