Вопрос по информатике:
Дано натуральное число. Верно ли, что первая цифра больше последней. Вывести сообщение на экран.
Помогите пожалуйста. Паскаль. Информатика.
- 11.11.2017 09:55
- Информатика
- remove_red_eye 18958
- thumb_up 27
Ответы и объяснения 1
Var
n:longint;
s:string;
begin
Write('Введите натуральное число: '); Read(n);
Str(n,s);
if s[1]>s[Length(s)] then Writeln('Первая цифра больше последней')
else Writeln('Первая цифра не больше последней')
end.
Тестовое решение:
Введите натуральное число: 526324
Первая цифра больше последней
Введите натуральное число: 3783
Первая цифра не больше последней
- 12.11.2017 19:15
- thumb_up 26
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.