Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Blackseeker228
0 / 0 / 0
Регистрация: 24.09.2017
Сообщений: 22
#1

Определить, являются ли два первых символа файла цифрами - Turbo Pascal

29.11.2017, 16:55. Просмотров 119. Ответов 4
Метки нет (Все метки)

Дан текстовый файл f. В файле не менее двух компонент. Определить, являются ли два
первых символа файла цифрами. Если да, то установить, является ли число,
образованное этими цифрами, четным
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.11.2017, 16:55
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Определить, являются ли два первых символа файла цифрами (Turbo Pascal):

Определить, являются ли два первых символа файла цифрами - Turbo Pascal
Дан символьный файл f. В файле f не менее двух компонентов. Определить, являются ли два первых символа файла цифрами. Если да то...

Определить, являются ли два первых символа цифрами - Turbo Pascal
Дан символьный файл f. В файле не менее двух компонентов. Определить, являются ли два первых символа цифрами. Если да, то установить,...

Определить: являются ли цифрами первые два символа файла - Turbo Pascal
В заданном символьном файле, где не меньше чем два компонента, определить: являются ли цифрами первые два символа файла. Если так то...

В текстовом файле определить: являются ли цифрами первые два символа файла - Turbo Pascal
помогите решить задачу, срочно нужно:wall: В заданном символьном файле, где не меньше чем два компонента, определить: являются ли цифрами...

Являются ли 2 первых символа файла цифрами, является ли число, образованное ими, четным - Turbo Pascal
Добрый вечер, помогите пожалуйста решить задачку:) Дан символьный файл f. В файле не менее 2х компонент. определить являются ли 2...

Операции с файлами. Являются ли два первых компонента файла цифрами, и если да, то четно ли образуемое ими число - Turbo Pascal
Дан символьный файл f. В файле не менее двух компонентов. Определить есть ли два первых символа файла цифрами. Если да, то установить есть...

4
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3589 / 2576 / 1759
Регистрация: 05.06.2014
Сообщений: 12,311
29.11.2017, 18:28 #2
Выяснить, являются ли первые два символа цифрами
Цитата Сообщение от Blackseeker228 Посмотреть сообщение
Дан текстовый файл f. В файле не менее двух компонент
Точно ли файл текстовый?
0
Cyborg Drone
Модератор
4829 / 2998 / 1206
Регистрация: 17.08.2012
Сообщений: 9,588
02.12.2017, 19:31 #3
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Это вечная путаница, то ли с переводом учебников с иноземных языков, то ли с неспособностью писателей учебников корректно выражать свои мысли. Полагаю, что, если перевести задание с русского на русский, то будет так:
Дан текстовый файл f. В начале первой строки файла расположены не менее двух символов, которые не являются управляющими. Определить, являются ли эти два символа цифрами. Если да, то установить, является ли число, образованное этими цифрами, чётным.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
const d = ['0'..'9'];
 
var s: string;
    f: text;
 
begin
  assign(f, 'f.txt');
  reset(f);
  readln(f, s);
  close(f);
  if (length(s) >= 2)
    then if (s[1] in d) and (s[2] in d)
      then begin
        writeln('Первые два символа файла являются цифрами.');
        write('Число ', s[1], s[2], ', которое они образуют, ');
        if odd(ord(s[2]) - ord('0')) then write('не');
        writeln('чётное.')
      end
      else writeln('Один либо оба первых символа файла не цифры.')
    else writeln('Первая строка файла содержит менее двух символов.');
  readln
end.
1
Blackseeker228
0 / 0 / 0
Регистрация: 24.09.2017
Сообщений: 22
09.12.2017, 21:36  [ТС] #4
Да, написано текстовый )
0
Cyborg Drone
Модератор
4829 / 2998 / 1206
Регистрация: 17.08.2012
Сообщений: 9,588
10.12.2017, 00:32 #5
Вот и хорошо. Программа Вам подходит.
0
10.12.2017, 00:32
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2017, 00:32
Привет! Вот еще темы с ответами:

Выяснить, являются ли первые два символа цифрами - Turbo Pascal
Имеется типизированный файл,элементами которого являются отдельные символы.выяснить,являются ли первые два символа цифрами.если да,то...

Ввести с клавиатуры три символа. Если хотя бы два из них являются цифрами, вывести все символы в строчку через три пробела - Turbo Pascal
Ввести с клавиатуры три символа. Если хотя бы два из них являются цифрами, вывести все символы в строчку через три пробела.

Дан символьный файл f. Определить, являются ли два последних символа файла цифрами - Pascal
Дан символьный файл f. Определить, являются ли два последних символа файла цифрами. Если да, то установить, является ли число, образованое...

Определить, являются ли два файла тождественными - Pascal
Даны два файла целых чисел. Определить , являются ли они тождественными.


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.