Вывести на экран N-ый элемент текста - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.71/7:

@eugen_1996 0 / 0 / 0 Регистрация: 11.02.2014 Сообщений: 23

	Вывести на экран N-ый элемент текста 05.05.2014, 14:14. Показов 1410. Ответов 1 Метки нет (Все метки) Помогите пожалуйста с задачей....Вот условие: Имеется файл с некоторым текстом. Необходимо вывести на экран N-ый элемент текста, если он есть. 0

Лучшие ответы (1)

Сообщение: #6129839

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

05.05.2014, 14:14

Ответы с готовыми решениями:

Из типизированного файла, который содержит несколько строк текста, вывести на экран монитора строку текста с определенным порядковым номером
1. Создать или открыть текстовый (типизированный, нетипизированный) файл. 2. Выполнить над текстовым (типизированным, нетипизированным)...

Определить максимальный нечетный элемент каждой строки матрицы, и вывести на экран сам элемент и его индексы
Дано: с клавиатуры вводятся два целых числа – М и К. 1<M<10, 1<K<10. (М – число строк, К – число столбцов) Требуется: сгенерировать...

Для каждой четной строки матрицы определить минимальный элемент и вывести на экран сам элемент и его индексы
Собственно задание. Дано: с клавиатуры вводятся два целых числа – М и К. 1<M<10, 1<K<10. (М – число строк, К – число столбцов) ...

Nickolay0512

58 / 40 / 41

Регистрация: 26.09.2013

Сообщений: 347

Записей в блоге: 1

05.05.2014, 15:41

Сообщение было отмечено eugen_1996 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var f:text;
    i,n:integer;
    a:char;
begin
     writeln('N=');
     readln(n);
     assign(f,'file.txt');
     reset(f);
     i:=0;
     while not eof(f) do
     begin
          inc(i);
          read(f,a);
          if i=n then break;
     end;
     close(f);
     writeln(a);
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

05.05.2014, 15:41

Помогаю со студенческими работами здесь

Задача Иосифа Флавия. Удалить каждый второй элемент из списка и в конце вывести на экран последний оставшийся элемент
Создать циклический список, в котором находятся элементы от 1 до N. Нужно написать программу, которая удаляет каждый второй элемент из...

Вывести массив на экран в виде таблицы, в конце каждой строки надо вывести минимальный элемент
Ребят , как вывести маленький элемент , что изменить в коде знак ">" меняю на "<" - не выходит. #include <iostream> ...

Вывести строку текста на экран
.model small .stack 256 .data Str1 db 'Здравствуй, МИР!!!', '$' .code start: mov ax,@data mov ds,ax lea dx, Str1 mov ah,...

Каждый элемент матрицы умножить на максимальный элемент у поточному рядку. Вывести на экран начальную та полученную матрицы
Здравствуйте! Дано задание: Каждый элемент матрицы умножить на максимальный элемент у поточному рядку. Вывести на экран начальную та...

Убрать из текста цифры и вывести на экран
Дан текст состоящий из символов разделенных между собой пробелами. Убрать из них цифры и вывести на экран Помогите пожалуйста. Нужна...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .

Наверх