Какое чиссло будет выведено на экран : Writeln (18 mod 2) ?

a) 9; б) 1; в) 0; г) 8.

Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln (' введи номер месяца ') ; readln (N_M) ; case N_M of 1:writeln (' январь ') ; 2:writeln (' февраль ') ;

Определить значение выражения: 1) 10 div 15 2) 10 div 2 3) 10 mod 2 4) 10 mod 17 5) 123 mod 10 6) 123 div 10 7) 1 div 2 8) 123 mod 1000 9) 100 mod 27 div 3 10) 100 div 5 mod 3 11) 98725 div 1000 mod 10 12) 100 mod 5 div 3

Укажите условие выбора чисел, кратных 3, но не кратны 6: 1) (X mod 60) ; 2 (x mod 3=0) OR (x mod 6=0) ; 3) (x mod 3=0) AND (x mod 60) ; 4) (x mod 3=0) OR (x mod 60).

Расположите выражения сверху вниз в порядке возрастания их значений 1. 931 div 100 2. (1234 div 10) mod 10 3. 931 mod 100 4. (1234 mod 100) mod 10 5. (1234 div 100) mod 10 6. 931 mod 10 7.100 mod 10 8. 100 div 10

Имеется условный оператор:if D10 then writeln ('ура!') else writeln ('плохо ...') ; Какими операторами его можно заменить? Выберите несколько из 4 вариантов ответа: 1) if D=10 then writeln ('ура!') else writeln ('плохо ...