возможно, не самое рациональное решение, но всё же.
program n1; uses crt; var n,k,ch,i,l,a,b,s: integer; beginclrscr; writeln('vvedite n'); readln(n); l: =n; repeatk: =k+1; n: =n div 10; until n=0; ch: =1; for i: =2 to k doch: =10*ch; a: =l div ch; b: =l mod 10; write(a+b); readlnend.
ele922009226536
31.08.2022
1. общая характеристика, состав и назначение основных видов программного обеспечения компьютерапрограммное обеспечение — это совокупность программ, позволяющих осуществить на компьютереавтоматизированную обработку информации.программное обеспечение делится на системное (общее) и прикладное (специальное).2. операционная система операцио́нная систе́ма , сокр. ос (. operating system, os) — комплекс взаимосвязанных программ, предназначенных для ресурсами компьютера и организации взаимодействия с пользователем.3. прикладные программы могут носить и общий характер, например, обеспечивать составление и печатание документов и т.п. в противоположность этому, операционная система или инструментальное по не вносят прямого вклада в удовлетворение конечных потребностей пользователя.
Liliya1106
31.08.2022
0101101100011010 посмотрим таблицу триад и тетрад разобьем 0101101100011010 на тетрады 0101,1011,0001,1010 и найдем каждую тетраду в таблице: 5b1a 0000 0 0001 1 0010 2 0011 3 0100 4 0101 5 0110 6 0111 7 1000 8 1001 9 1010 a 1011 b 1100 c 1101 d 1110 e 1111 f
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Дано натуральное число n. найти сумму первой и последней цифры этого числа
возможно, не самое рациональное решение, но всё же.
program n1; uses crt; var n,k,ch,i,l,a,b,s: integer; beginclrscr; writeln('vvedite n'); readln(n); l: =n; repeatk: =k+1; n: =n div 10; until n=0; ch: =1; for i: =2 to k doch: =10*ch; a: =l div ch; b: =l mod 10; write(a+b); readlnend.