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

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

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

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

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

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

Код:
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
По умолчанию

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

Цитата:
Сообщение от 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
Сообщений: 5,040
По умолчанию

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

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
Сообщений: 26,260
По умолчанию

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
Сообщений: 5,040
По умолчанию

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

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


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


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS