Program DZ;
var a:real;
begin
read (a);
if a>1000 then
begin
a:=a-a/100*15;
write (a:0:3);
end
else write ('скидка не предоставляется');
end.
2, 4, 8, 16 (двоичная (10000), четверичная (100), восьмеричная (20), шестнадцатеричная (10))
нет
например число 546
если средняя цифра то это 4 а крайние это 5 и 6 4<30~~~
если среднее арифм. то это 5+4+6/2 т.е. 15/2 = 7.5 и опять же 7.5<30
Для уменьшения их размера.
Пусть
а - один катет
б - второй
Тогда площадь равна а*б делить на 2
Периметр равен сумме длин всех сторон, для этого найдем гипотинузу по теореме пифагора а квадрат + б квадрат, результат берем под корень,
затем скаладываем а, б и гипотинузу