<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=ReadInteger('n=');
var p:=1;
while n>0 do begin
var d:=n mod 10;
if d.IsOdd then p*=d;
n:=n div 10
end;
Writeln('Произведение нечетных цифр числа равно ',p)
end.
<u>Пример</u>
n= 53892
Произведение нечетных цифр числа равно 135
// javaScript
var x=120; // подкрипления первий раз (в секунд)
var opozdanue; // опоздание козлят в минутах
opozdanue = (x +2*x+2*x-30)/60;
console.log (opozdanue );
Самый простой метод: объявить число Pi как константу. Или можно сделать так:
<span>#define _USE_MATH_DEFINES
</span>#include <iostream>
<span>#include <cmath>
#include <math.h></span>