1. роль информационной деятельности в современном обществе. поколения развития эвм. 2. понятие информатики, информации и информатизации. понятие информационного сообщения, общая схема передачи информации. информационные революции. 3. свойства информации. виды операций с данными. 4. правовые нормы в информационной сфере. электронное правительство. 5. информация и ее кодирование. универсальная система кодирования. кодирование графических данных. кодирование звуковой информации. 6. системы счисления и единицы информации. 7. высказываний. законы логики. 8. алгоритм. основные типы алгоритмических структур. 9. автоматические и автоматизированные системы . 10. архитектура современного компьютера. программный принцип работы компьютера. 11. виды памяти в компьютере. электронные платы, контроллеры и шины. 12. устройства ввода данных. устройства вывода данных. устройства хранения данных. 13. системное программное обеспечение. прикладное программное обеспечение. 14. язык pascal. алфавит. структура программы. типы данных. 15. операционная система. файлы и файловая система 16. компьютерные вирусы. антивирусные программы. архивация файлов. 17. microsoft office word. создание и форматирование документа. параметрами абзаца. 18. microsoft office word. форматирование текста в виде списков. форматирование текста в виде колонок. 19. создание таблицы, преобразование текста в таблицу и редактирование таблицы в microsoft word. форматирование таблиц в microsoft word. 20. вставка объектов в документ word. вставка формул в документ word. 21. оформление текста с wordart. 22. понятие формулы и функции в microsoft excel. правила синтаксиса при записи функций. 23. ошибки в формулах microsoft excel. 24. логические функции в microsoft excel. 25. форматирование ячеек таблицы в microsoft excel. 26. построение диаграмм в microsoft excel. 27. использование маркера автозаполнения в microsoft excel. 28. поиск и фильтрация данных в microsoft excel. условное форматирование и сортировка данных в создания презентаций в microsoft power point. 30. организация баз данных и системы базами данных. структура данных и система запросов. 31. передача информации. локальные компьютерные сети. 32. всемирная паутина (world wide web). электронная почта. поиск информации в сети интернет1. роль информационной деятельности в современном обществе. поколения развития эвм. 2. понятие информатики, информации и информатизации. понятие информационного сообщения, общая схема передачи информации. информационные революции. 3. свойства информации. виды операций с данными. 4. правовые нормы в информационной сфере. электронное правительство. 5. информация и ее кодирование. универсальная система кодирования. кодирование графических данных. кодирование звуковой информации. 6. системы счисления и единицы информации. 7. высказываний. законы логики. 8. алгоритм. основные типы алгоритмических структур. 9. автоматические и автоматизированные системы . 10. архитектура современного компьютера. программный принцип работы компьютера. 11. виды памяти в компьютере. электронные платы, контроллеры и шины. 12. устройства ввода данных. устройства вывода данных. устройства хранения данных. 13. системное программное обеспечение. прикладное программное обеспечение. 14. язык pascal. алфавит. структура программы. типы данных. 15. операционная система. файлы и файловая система 16. компьютерные вирусы. антивирусные программы. архивация файлов. 17. microsoft office word. создание и форматирование документа. параметрами абзаца. 18. microsoft office word. форматирование текста в виде списков. форматирование текста в виде колонок. 19. создание таблицы, преобразование текста в таблицу и редактирование таблицы в microsoft word. форматирование таблиц в microsoft word. 20. вставка объектов в документ word. вставка формул в документ word. 21. оформление текста с wordart. 22. понятие формулы и функции в microsoft excel. правила синтаксиса при записи функций. 23. ошибки в формулах microsoft excel. 24. логические функции в microsoft excel. 25. форматирование ячеек таблицы в microsoft excel. 26. построение диаграмм в microsoft excel. 27. использование маркера автозаполнения в microsoft excel. 28. поиск и фильтрация данных в microsoft excel. условное форматирование и сортировка данных в создания презентаций в microsoft power point. 30. организация баз данных и системы базами данных. структура данных и система запросов. 31. передача информации. локальные компьютерные сети. 32. всемирная паутина (world wide web). электронная почта. поиск информации в сети интернет
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293
var
x, y, a, b, k: integer;
begin
k:=10000;
repeat
x:=k;
a := 0; b := 0; y := 1;
while x > 0 do
begin
if (x mod 10) mod 2 = 0
then
a := a * 10 + x mod 10
else begin
y := y * 10;
b := b * 10 + x mod 10
end;
x := x div 10
end;
a := a * y + b;
k := k + 1;
until a = 26391;
writeln(a:8, k-1:8);
end.
55:5=11
365:11≈33(34) берём "34", чтобы перехлестнуть 365.
Так как 11-ый член является замыкающим (перехлёстывающим 365), тогда смотрим по ближайшим:
34*10=340 (340+34=374) - подходит, но это не максимум!
365 mod 10= 36, а это значит, что последующий член будет больше 365, а именно 395.
В задании сказано, что d должно быть максимальным, а "34" - это допустимое, но не максимально число, удовлетворяющее условию, даже минимальное (по результату).
Проверка:
34*11=374, значит, когда на экране выведется s:=340, n:=50, то, зайдя по следующему циклу, получится, что s:= 374, n:=55. На следующий цикл программа не пойдёт.
ответ: d=34.