a, b: integer;
number : integer;
beginwriteln('Добро в наш калькулятор/You are welcome! Введите значение a =');
read(a);writeln('Введите значение b =');
read(b);writeln('Выберите что хотите сделать, 1 + , 2 - , 3 / , 4 * , 5 ^2 , 6 корень');
readln(number);if number = 1 then
writeln('a + b = ', a+b)
elseIf number = 2 then
writeln('a - b = ', a-b)
elseIf number = 3 then
writeln('a : b = ', a/b)
elseIf number = 4 then
writeln('a * b = ', a*b)
else beginIf number = 5 then
writeln('a^2 = ', sqr(a));
writeln('b^2 = ', sqr(b));
end; beginIf number = 6 then
writeln('Корень из a = ', sqrt(a));
writeln('Корень из b = ', sqrt(b));
за использование нашего калькулятора (Автор: Хамидов Алишер/Thank you for using my calc. (Author:Khamidov Alisher)');
writeln('You can find me on Instagram @khamidoff_ali/Вы можете найти меня в Инстаграм @khamidoff_ali');
end; end.
2 2
+ 5 5
1 1 0
Рассмотрим сложение в младшем разряде. В десятичной системе счисления 2+5=7, а у нас записан ноль. Следовательно, данный разряд был сброшен, а в следующий добавлена единица. Такое возможно только если сумма (т.е. 7) равна основанию системы счисления, в которой производится сложение. Т.е. мы делаем предположение, что система семиричная.
В самом деле, когда мы складываем два однозначных десятичных числа, например 2 и 8, то получаем 10, 0 в разряде сложения и перенос 1 в следующий разряд. В двоичной система 1+1=10, т. е. тут двойка (1+1) - основание системы - привела к появлению нуля и переносу.
Проверим предположение, что система семиричная. В следующем разряде снова 2+5=7, но еще есть разряд переноса, итого 8. Но 8 в семиричной системе записывается как 11. Итого получается как раз 110, т.е. система счисления действительно семиричная.