Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 13.10.2016, 00:19   #1
Катя Стреканова
Новичок
Джуниор
 
Регистрация: 13.10.2016
Сообщений: 12
Репутация: 10
По умолчанию Задача на числовой ряд из двузначных чисел (Pascal)

Есть числовой ряд:10111213...979899, в котором подряд выписаны все двузначные числа. Определить двузначное число из этого ряда, образованное парой цифр, в
которую входит к-ая цифра. к вводит и лежит в диапазоне от 1 до 180. например, при к=4 надо выдать ответ11. нужно написать на паскале
Катя Стреканова вне форума   Ответить с цитированием
Старый 13.10.2016, 01:31   #2
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 25,845
Репутация: 5617
По умолчанию

Код:
var k : integer;
begin
  ReadLn(k);
  WriteLn(10 + ( (k-1) div 2 ) );
end.
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 13.10.2016, 08:42   #3
Катя Стреканова
Новичок
Джуниор
 
Регистрация: 13.10.2016
Сообщений: 12
Репутация: 10
По умолчанию

Это и все....оо я голову ломала через процедуру делала...спасибо большое )))

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
Код:
var k : integer;
begin
  ReadLn(k);
  WriteLn(10 + ( (k-1) div 2 ) );
end.
Катя Стреканова вне форума   Ответить с цитированием
Старый 13.10.2016, 13:03   #4
evg_m
Профессионал
 
Регистрация: 20.04.2008
Сообщений: 4,917
Репутация: 2242
По умолчанию

Цитата:
Это и все....
к сожаление нет, не все!

180 ->...9899 10 + (180-1) div 2 =99 OK
179 ->...9899 10 + (179-1) div 2 =98 ERROR (должно быть 89 смотри начало строки)
__________________
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума   Ответить с цитированием
Старый 13.10.2016, 13:11   #5
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 25,845
Репутация: 5617
По умолчанию

evg_m
вы ошибаетесь. строка состоит из двузначных чисел (по условию)

нужно вывести не кусочек строки, а то число ( в задании - это "двузначное число из этого ряда, образованное парой цифр") , в которое входит указанная цифра.

например,
к=1 - нужно вывести 10
и к=2 нужно вывести 10

к=3 - нужно вывести 11
к=4 - нужно вывести 11

...
k=179 - нужно вывести 99
k=180 - нужно вывести 99

и, кстати, что за странные вычисления?
179-1 = 178
178 div 2 = 89
10 + 89 = 99
откуда у Вас 98 взялось?
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 13.10.2016, 13:23   #6
evg_m
Профессионал
 
Регистрация: 20.04.2008
Сообщений: 4,917
Репутация: 2242
По умолчанию

согласен!
прочитал условие как
двузначное число НАЧИНАЮЩЕЕСЯ с указанного места (k)
__________________
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача по паскалю: вычислить сумму всех двузначных чисел по условию iceKirito Паскаль 13 22.10.2014 08:59
подпрограмма нахождения двузначных чисел Pascal ABC программирование Помощь студентам 0 03.06.2013 17:17
Числовой ряд nagabara Фриланс 4 26.06.2011 19:59
задача:Паскаль и ряд чисел Фибоначчи SEREG@ Помощь студентам 20 16.12.2007 21:05


21:37.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.