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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.04.2012, 16:56   #1
Айдар123
 
Регистрация: 21.04.2012
Сообщений: 8
По умолчанию записи

Помогите решить задачу. Уже голову сломал)
Дана таблица, содержащая сведения об игрушках:название игрушки(например,кукла,кубики,мяч и т.д.), ее стоимость втенге и возрастные границы детей, для которых игрушка предназначена. составить программу, которая позволит получить: название игрушек, цена которых не превышает 200 тенге и подходит детям до 5 лет.
Заранее благодарю.

Последний раз редактировалось Айдар123; 26.04.2012 в 16:06.
Айдар123 вне форума Ответить с цитированием
Старый 25.04.2012, 17:10   #2
whatever
a.k.a. Skull
Форумчанин
 
Регистрация: 17.11.2009
Сообщений: 963
По умолчанию

и чем тут голову сломать можно?

Запись:
Код:
Ttoy=record
  name:string;
  prise:real;
  lowyears,highyears:byte;
end;
"таблица":
Код:
  Ttoys=array of Ttoy
var
  toys:ttoys
Название игрушек, цена которых не превышает 200 тенге и подходит детям до 5 летпо сути их ноль, ибо цена в рублях, но не будем на этом зацикливаться):
Код:
for i:=0 to high(toys) do
  if (toys[i].prise<200)and(toys[i].highyears<5) then
    writeln(toys[i].name)
Все тривиальное просто

Последний раз редактировалось whatever; 25.04.2012 в 17:14.
whatever вне форума Ответить с цитированием
Старый 26.04.2012, 15:34   #3
Айдар123
 
Регистрация: 21.04.2012
Сообщений: 8
По умолчанию паскаль

А как решить в паскаль?
Айдар123 вне форума Ответить с цитированием
Старый 26.04.2012, 16:00   #4
Mandrivnyk
Software Developer
Участник клуба
 
Аватар для Mandrivnyk
 
Регистрация: 01.03.2011
Сообщений: 1,098
По умолчанию

Цитата:
Сообщение от Айдар123 Посмотреть сообщение
А как решить в паскаль?
А это, по-твоему, в чем?
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв.
Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062
Mandrivnyk вне форума Ответить с цитированием
Старый 26.04.2012, 16:06   #5
Айдар123
 
Регистрация: 21.04.2012
Сообщений: 8
По умолчанию

Спасибо конечно))) Просто я в программирование полный ноль.
Айдар123 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Записи Oskar211 Паскаль, Turbo Pascal, PascalABC.NET 0 21.12.2011 21:05
Оцените математической формулой, насколько больше цифр в двоичной записи большого числа, чем в его десятичной записи. Анюта.Хом Помощь студентам 1 02.12.2011 23:13
Записи _Hanter_ Паскаль, Turbo Pascal, PascalABC.NET 2 21.11.2011 21:36
Записи _Hanter_ Паскаль, Turbo Pascal, PascalABC.NET 3 16.11.2011 18:14
записи Cepgeich Помощь студентам 2 23.04.2010 11:03