<u>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadReal('a=');
var b:=ReadReal('b=');
var c:=ReadReal('c=');
var p:=(a+b+c)/2;
var s:=Sqrt(p*(p-a)*(p-b)*(p-c));
Writeln('s=',s:0:1)
end.
n = int(input('Введите число: '))
sum = 0
while n != 0:
a = n % 10
if a == 5:
sum += a
n //= 10
print('Сумма пятёрок:',sum)
Ответ:
этот фрукт кисло-сладкий и спелый