Написать программу для рассчета стоимости покупки из 5 предметов, если цена каждого из предметов задается командой ввода. программа должна быть понятна любому пользователю. turbo pascal
Рассмотрим сложение в младшем разряде. В десятичной системе счисления 2+5=7, а у нас записан ноль. Следовательно, данный разряд был сброшен, а в следующий добавлена единица. Такое возможно только если сумма (т.е. 7) равна основанию системы счисления, в которой производится сложение. Т.е. мы делаем предположение, что система семиричная. В самом деле, когда мы складываем два однозначных десятичных числа, например 2 и 8, то получаем 10, 0 в разряде сложения и перенос 1 в следующий разряд. В двоичной система 1+1=10, т. е. тут двойка (1+1) - основание системы - привела к появлению нуля и переносу. Проверим предположение, что система семиричная. В следующем разряде снова 2+5=7, но еще есть разряд переноса, итого 8. Но 8 в семиричной системе записывается как 11. Итого получается как раз 110, т.е. система счисления действительно семиричная.
1. Определим количество возможных символов в одном разряде номера. Поскольку используется 22 буквы и 10 цифр, то в сумме получается 32 символа. 2. Определим количество бит, необходимых для кодирования набора из 32 символов. Если считать, что символы кодируются цифрами от 0 до 31, потребуется бит. 3. Определим количество байт, которое займет один номер. В номере 7 символов, поэтому для его кодирования нужно 7х5=35 бит. В байте 8 бит, тогда для размещения 35 бит потребуется 35/8 ≈ 5 байт (округляем до целых всегда в большую сторону). 4. Определим объем памяти, отводимый для записи 50 номеров. 50х5=250 байт.
uses crt;
begin
writeln('Введите цену 1 товара:');
readln(p1);
writeln('Введите цену 2 товара:');
readln(p2);
writeln('Введите цену 3 товара:');
readln(p3);
writeln('Введите цену 4 товара:');
readln(p4);
writeln('Введите цену 5 товара:');
readln(p5);
writeln('Цена вашей покупки составляет ',p1+p2+p3+p4+p5);
end.
P.S. Надеюсь на Лучший ответ.