Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

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

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

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

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

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

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

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

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, 12:23   #6
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,526
По умолчанию

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


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача по паскалю: вычислить сумму всех двузначных чисел по условию iceKirito Паскаль, Turbo Pascal, PascalABC.NET 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 20:05