1. Дана последовательность из N (2

1. Дана последовательность из N (2 <= N <= 100000) различных чисел. Выписать в возрастающем порядке все целые числа находящиеся в интервале от минимального до максимального значения элементов этой последовательности, которые не находятся в данной последовательности. Пример: pos.inpos.out 5 1 7 10 3 2 4 6 8 9 2. Дано натуральное число К. Напечатать К-ую цифру последовательности 110100100010000100000…, в которой выписаны подряд степени числа 10. Пример: dec.indec.out 4 1 3. Написать программу, которая переводит десятичное натуральное число N (1 <= N <= 2147483648) в шестнадцатеричную систему счисления. Входной файл: tohex.in, выходной: tohex.out. Пример: Tohex.in Tohex.out 35432 8A68

в избранное

doka58

02 сентября 2022

2) program 2; vark: integer; tmp: real; b: string; c: string; i: integer; begin k: =0; i: =0; tmp: =0; write ('Введите k: '); read (k); repeat tmp: =exp (i*ln (10); str (tmp: 0:0, c); b: =b+c; i: =i+1; until length (b) >=k; c: =copy (b, k, 1); writeln (b); writeln ('k-я цифра: ', c); readln (k); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?