Составить программу в паскале для вычесления значений выражений trunc(4,8) 15 div 6. round (4,8)

Знания

Информатика

1 ответ:

Эксперт69 [192]4 года назад

0 0

Begin
Writeln(Trunc(4.8),' ',15 div 6,' ',Round(4.8))
end.

Результаты
4 2 5

Читайте также

Напишите программу перевода двоичного числа 10101001011 в десятичную СС в Паскале АВС

Захар1997

//PascalABC.NET 3.1 сборка 1239
function BinToDec(bin: string): integer;
begin
    var n := 0;
    var p := 1;
    for var i := length(bin) downto 1 do
    begin
        n += p * StrToInt(bin[i]);
        p *= 2;
    end;
    Result := n;
end;

begin
    var s := ReadlnString('s =');
    writeln(BinToDec(s));
end.

0 0

4 года назад

Инфооматика 8 класс - ЛОГИЧЕСКИЕ ОПЕРАЦИИ. Нужно сократить выражения: 1. А + не А × В + не А × С 2. (не А + В) × не С × (С + А

Мартыненко Дмитрий

$\displaystyle A+\lnot A\cdot B+\lnot A\cdot C=A+\overline AB+\overline AC=A+\overline A(B+C)=A+B+C \\ \\ 
(\lnot A+B)\lnot C(C+A\lnot B)=(\overline A+B)\overline C(C+A\overline B)= \\ (\overline A+B)A\overline B\,\overline C=0+0=0$