Составьте программу которая выводит на экран пример на умножение двух целых чисел, запрашивает ответ пользователя.проверяет его и выводит соответсвующиеся сообщения : "правильно! " либо "вы ошиблись" .а также правильный результат
if sum=(a*b) then write("pravilno! ") else write("neverno");
readln
end.
mnogoz
05.05.2021
26 заглавных букв + 26 строчных букв + 10 цифр + 6 символов = 68 знаков используются в паролях. один такой знак занимает минимально 7 бит (2^6=64 < 68 < 128=2^7). но символы кодируют целым числом байт. значит по 1 байту (8 бит) на символ. длина пароля равна 12 символов, которые занимают 12 байт. всего выделено 1080 байт на 40 пользователей, то есть 1080/40 = 27 байт на одного пользователя. из них 12 байт занято под пароль. остается 27-12=15 байт можно использовать для хранения дополнительных сведений о каждом пользователе
heodbxbbshe
05.05.2021
10 -> 2 2018 / 2 = 1009. остаток 0. 1009 / 2 = 504. остаток 1. 504 / 2 = 252. остаток 0. 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. берём ответ последнего деления и идём по остаткам от конца до начала. 11111100010 2 -> 16 от конца берём по 4 цифры и считаем их значение по заранее составленной таблице. [111][1110][0010] = [7][14][2] = 7e2 16 -> 10нумеруем цифры от конца до начала индексами в порядке возрастания, начиная от 0, впоследствии каждую цифру нужно умножить на порядок той системы счисления, из которой производится перевод (16), возведённой в степень, равную индексу, и всё сложить.7e2 = [7][14][2] = 7 * 16^2 + 14 * 16^1 + 2 * 16^0 = 1792 + 224 + 2 = 2018
var a,b,sum: integer;
begin
randomize;
a: =random(10);
b: =random(10);
write(a,"*",b,"=");
read(sum);
if sum=(a*b) then write("pravilno! ") else write("neverno");
readln
end.