1)визначити істиність виразу a>5 якщо a)a=8 b)a=5 c)a=2
2)обчислити
a)7 mod 2
b)7 dir 2
c)123 mod 100
d)123 dir 10
e)(123 dir 10) mod 10

185

266

Посмотреть ответы 2

Ответы на вопрос:

bolatzarina

Информатика

4,4(66 оценок)

1. 10

2. 12

3. 3

4. 22

5. 15

6. 34

7. 3

Часть 2

Var

n:integer;

Begin

Write('Введи число ');

Readln(n);

if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное);

End.

Var

a,b:integer;

Begin

Write('Введи числа ');

Readln(a,b);

if a>b then Begin Write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b);

End.

Var

n:integer;

Begin

write('Введи двузначное число ');

Readln(n);

if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе');

End.

Подробнее - на - ответ:

Объяснение:

Ventana1263

Информатика

4,4(66 оценок)

//gnu c++ 11 #include < iostream> using namespace std; void while3 (int n, int k, int & quit, int & modul) { //quit - частное, modul - остаток quit=0; modul=0; while (n> =k) {quit++; n-=k; } modul=n; } int while9 (int n) { int k=1; while (3*k< n) k++; return k; } int sum (int n){if (n==1) return 1; else return n+sum(n-1); } //немного рекурсии void while11 (int n, int & k, int & s) { k=1; s=1; while (sum(k)< n) k++; s=sum(k); } int main () { //пиши функцию, задавай параметры return 0; }