24.01.2018, 14:09 [+3 UTC]
в нашей команде: 2 496 чел. | участники онлайн: 5 (рекорд: 21)

:: РЕГИСТРАЦИЯ

:: консультации

:: задать вопрос

:: все разделы

:: правила

:: новости

:: участники

:: доска почёта

:: форум

:: блоги

:: поиск

:: статистика

:: наш журнал

:: наши встречи

:: наша галерея

:: отзывы о нас

:: поддержка

:: руководство

Версия системы:
7.42 (30.12.2017)

Общие новости:
02.01.2018, 09:46

Форум:
23.01.2018, 17:49

Последний вопрос:
24.01.2018, 11:08

Последний ответ:
24.01.2018, 11:21

Последняя рассылка:
24.01.2018, 02:15

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
15.04.2016, 20:09 »
vitya-titya
Большое спасибо, очень сильно помогли! [вопрос № 189126, ответ № 273636]
05.04.2010, 09:39 »
strannik2000
Отлично! Спасибо! [вопрос № 177678, ответ № 260610]

РАЗДЕЛ • Pascal / Delphi / Lazarus

Создание программ на языках Pascal, Delphi и Lazarus.

[администратор рассылки: Зенченко Константин Николаевич (Модератор)]

Лучшие эксперты в этом разделе

Зенченко Константин Николаевич
Статус: Модератор
Рейтинг: 361
Вадим Исаев ака sir Henry
Статус: Старший модератор
Рейтинг: 57
Евгений/Genia007/
Статус: Профессионал
Рейтинг: 20

Перейти к консультации №:
 

Консультация онлайн # 138859
Раздел: • Pascal / Delphi / Lazarus
Автор вопроса: Dextrous
Отправлена: 01.06.2008, 01:49
Поступило ответов: 2

Здравствуйте Уважаемые эксперты!!! нуждаюсь в Вашей помощи, в решении задачи!!
>>> Ввести информацию об автолюбителях: фамилия, марка автомобиля, цвет машины.
1. Данные хранить в виде записи с полями – фамилия и инициалы, марка автомобиля, цвет машины.
Вывести на экран дисплея сведения об автолюбителях, имеющих автомобиль "Жигули" зеленого цвета.
Результат работы программы записать в файл REZ.DAT.
2. Данные хранить в виде записи с полями – фамилия и инициалы, автомобиль - являющаяся записью из трех полей:
марка автомобиля, цвет машины, год выпуска. Вывести на экран дисплея сведения об автолюбителях,
имеющих автомобиль "Жигули" зеленого цвета, список упорядочить по году выпуска.
Результат работы программы записать в файл REZ.DAT.

Приложение:

Состояние: Консультация закрыта

Ответ # 225183 от S K A L T

Здравствуйте, Dextrous!
Я написал вторую задачу. Поиск осуществляется по марке и по цвету, но если нужно именно с "Жигули" и "зеленого цвета" то уберите это:
write('vvedite marky avto:');
readln(marka);
write('vvedite color avto:');
readln(col);
и напишите так:
If (avto.mark="Жигули") and (avto.color="зеленый") then..
В первой задаче нужно лишь изменить описание записи вначале:

type Tstudent2=record
name:string[20];
mark:string[10];
color:string[30];
end; и нужно обращатся не Avto.color или avto.mark,
а просто color, mark.
Удачи!!!

Приложение:


Консультировал: S K A L T
Дата отправки: 01.06.2008, 13:49

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Ответ # 225186 от Пупорев Юрий Борисович

Здравствуйте, Dextrous!
Решение обеих задач, выполненных в едином стиле, в приложении. Пояснений ко второй задаче мало, т.к. почти все повторяется.

Приложение:


Консультировал: Пупорев Юрий Борисович
Дата отправки: 01.06.2008, 14:49

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Возможность оставлять сообщения в мини-форумах консультаций доступна только после входа в систему.
Воспользуйтесь кнопкой входа вверху страницы, если Вы зарегистрированы или пройдите простую процедуру регистрации на Портале.

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.14400 сек.

© 2001-2018, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.42 от 30.12.2017