Var a, b: integer;begin writeln( Введите одно четное и одно нечетное числа ); readln(a, b); if a mod - id1309328020200430 от krivoruchenkoev 30.04.2020 22:25

Question

Информатика: Var a, b: integer;begin writeln( Введите одно четное и одно нечетное числа ); readln(a, b); if a mod 2 = 0 then writeln(b, - нечетное число ) else writeln(a, - нечетное число );end. Напишите, что делает эта программа.

krivoruchenkoev · Accepted Answer

1)
А10=252
А2=11111100
Решение:
252/2 =126    остаток 0
126/2 =63 остаток 0
63/2 =31    остаток 1
31/2 =15 остаток 1
15/2 =7 остаток 1
7/2=3 остаток 1
3/2 = 1 остаток 1
1/2 =0 остаток 1
Записываем ответ снизу вверх:
А2=11111100
2)
А10=252
А8=374
Решение:
252/8 =31    остаток 4
31/8 =3 остаток 7
3/8 =0 остаток 3
Записываем ответ снизу вверх:
А8=374
3)
А10=252
А16=FC
F=15 C=12
Решение:
252/16 = 15 остаток 12(С)
15/16 = 0 остаток 15(F)
Записываем ответ снизу вверх:
А16=FC

MOGZ ответил