Найти записи, в которых число состоит из невозрастающих четных цифр

@DashkaRomashka · Регистрация: 31.10.2013

Студворк — интернет-сервис помощи студентам

Ребята, помогите пожалуйста создать типизированный файл и вывести его на экран.
Условия создания файла на картинке.
Когда с клавиатуры данные вводить у меня получается, а вот во случайными не могу никак, уже все перепробовала.
Заранее благодарна

Лабораторное задание 6
Тема. Работа с типизированными файлами Задание. Разработать программу, которая
■ создает типизированный файл F из 100 записей
(каждая запись содержит 2 поля созданных случайным образом:
в одном поле хранится слово от 2-х до 8 букв;
в другом - хранится целое число, значением до 32000);
■ последовательно читает данные из файла F и находит записи, в которых число состоит из невозрастающих четных цифр;
■ выводит на экран 3 первые найденные записи и их номера в файле;
■ по запросу осуществляет контрольное чтение из файла F заданных записей по их номерам с представлением данных на экране монитора.

@DashkaRomashka · 01.11.2013, 13:58 **[ТС]**

Ну помогите кто нибудь пожалуйста

@kastiniel · 01.11.2013, 14:46

создаешь 2 типизированных файла типа string и integer, потом в первый засовываешь случайную букву сформированную вот так: сперва создаешь количество random(6)+2, потом запускаешь цикл от 1 до полученного числа где создаешь число random(33)+1, с помощью которого из массива букв достаешь букву(случайную) и прикрипляешь к строке, потом эту строку записываешь в файл, а со вторым тут просто random(Integer) если так не работает, то random(32000) и это число записываешь во второй файл...
Думаю доступно описал))))

@DashkaRomashka · 02.11.2013, 22:22 **[ТС]**

Со случайными числами разобралась, а с буквами не могу.
Напишите пример пожалуйста в виде кода, если не сложно

@Булат Шакиров · 03.11.2013, 10:32

Pascal
1
ch:=chr(random(255-32)+32);

Добавлено через 45 секунд
Это ответ на последний вопрос, как получить слчайную букву.

@kastiniel · 05.11.2013, 17:59

Сообщение от Булат Шакиров

Pascal
1
ch:=chr(random(255-32)+32);

Добавлено через 45 секунд
Это ответ на последний вопрос, как получить слчайную букву.

А ты в этом уверен??? маленькие русские в таблице ASCII начинаются с 224 по 255, если я не ошибаюсь(а я не ошибаюсь гугл мне в помощь!!!!), тогда будет выглядеть так, если через ASCII делать

Pascal
1
2
3
4
5
6
n:=random(8)+2;{количество букв в слове}
str:="";
for i:=1 to n do
 begin
  str:=str+chr(random(32)+224);{если не захватит я, то надо писать 33 вместо 32}
end;

вот так более правильно!!!!!

Новые блоги и статьи Все статьи Все блоги /
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .

@DashkaRomashka 0 / 0 / 0 Регистрация: 31.10.2013 Сообщений: 3

	Найти записи, в которых число состоит из невозрастающих четных цифр 31.10.2013, 13:48. Показов 963. Ответов 5 Метки нет (Все метки) Ребята, помогите пожалуйста создать типизированный файл и вывести его на экран. Условия создания файла на картинке. Когда с клавиатуры данные вводить у меня получается, а вот во случайными не могу никак, уже все перепробовала. Заранее благодарна Лабораторное задание 6 Тема. Работа с типизированными файлами Задание. Разработать программу, которая ■ создает типизированный файл F из 100 записей (каждая запись содержит 2 поля созданных случайным образом: в одном поле хранится слово от 2-х до 8 букв; в другом - хранится целое число, значением до 32000); ■ последовательно читает данные из файла F и находит записи, в которых число состоит из невозрастающих четных цифр; ■ выводит на экран 3 первые найденные записи и их номера в файле; ■ по запросу осуществляет контрольное чтение из файла F заданных записей по их номерам с представлением данных на экране монитора. 0

@DashkaRomashka 0 / 0 / 0 Регистрация: 31.10.2013 Сообщений: 3
	01.11.2013, 13:58 [ТС]
	Ну помогите кто нибудь пожалуйста 0

@kastiniel 60 / 60 / 46 Регистрация: 25.11.2011 Сообщений: 259
	01.11.2013, 14:46
	создаешь 2 типизированных файла типа string и integer, потом в первый засовываешь случайную букву сформированную вот так: сперва создаешь количество random(6)+2, потом запускаешь цикл от 1 до полученного числа где создаешь число random(33)+1, с помощью которого из массива букв достаешь букву(случайную) и прикрипляешь к строке, потом эту строку записываешь в файл, а со вторым тут просто random(Integer) если так не работает, то random(32000) и это число записываешь во второй файл... Думаю доступно описал)))) 2

@DashkaRomashka 0 / 0 / 0 Регистрация: 31.10.2013 Сообщений: 3
	02.11.2013, 22:22 [ТС]
	Со случайными числами разобралась, а с буквами не могу. Напишите пример пожалуйста в виде кода, если не сложно 0

Найти записи, в которых число состоит из невозрастающих четных цифр

Решение