|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
13.04.2018, 17:25 | #1 |
Регистрация: 13.04.2018
Сообщений: 6
|
Нужно перевести код из Turbo Pascal в PascalABC - Структура элемента массива пассажир: фамилия, имя, отчество, номер рейса, количество багажных мест, общий вес
Есть задача:
Структура элемента массива пассажир: фамилия, имя, отчество, номер рейса, количество багажных мест, общий вес. Определить: ─ рейс с максимальным весом багажа; ─ пассажира с наибольшим количеством вещей; ─ вывести список пассажиров, улетающих заданным рейсом, и информацию об их багаже. Нужно перевести её из Turbo Pascal в PascalABC. Помогите. Я пробовала перевести, но возникла ошибка :"Program1.pas(7) : Встречено 'type', а ожидался оператор" Сама задача: |
13.04.2018, 17:27 | #2 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
вложение, да ещё и рар, кто будет качать? кому это надо? как думаете?
|
13.04.2018, 17:30 | #3 |
Регистрация: 13.04.2018
Сообщений: 6
|
Программа просто огромная. Как мне её сюда залить?
|
13.04.2018, 17:44 | #4 |
Регистрация: 13.04.2018
Сообщений: 6
|
Залила как txt
вот код на 2 поста. Код:
|
13.04.2018, 17:46 | #5 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
конец
Код:
|
13.04.2018, 17:55 | #6 |
Регистрация: 13.04.2018
Сообщений: 6
|
Program1.pas(4) : Неизвестное имя 'ClrScr'
Program1.pas(16) : Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла Program1.pas(16) : Параметр цикла for в PascalABC.NET должен описываться в заголовке цикла Возникла ошибка e' Все та же ошибка с 'type' Program1.pas(6) : Встречено 'type', а ожидался оператор |
13.04.2018, 18:03 | #7 |
Александр
Администратор
Регистрация: 28.10.2006
Сообщений: 17,501
|
Может кто-то появится у кого и тот и тот компилятор, я всем чем мог с оформлением темы помог )
|
13.04.2018, 18:18 | #8 |
Регистрация: 13.04.2018
Сообщений: 6
|
|
15.04.2018, 15:58 | #9 |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,309
|
Если ещё актуально.
Pascal ABC у меня нет, но Google говорит, что переменная цикла for для ABC описывается в заголовке: Код:
Для начала просто комментируйте эти строки и пробуйте удалить другие ошибки. В одном месте встретил вариант ClrScr() - со скобками. Возможно это так и должно, но проверить нечем. Модуль crt подключен, но вот есть ли он в наличии? И нет ли там ругани и на этот модуль? PS: переменная i, которая используется в циклах описана как глобальная, но как её видит Pascal ABC, когда она используется в функции? Как вариант, попробовать описать её во внутренних переменных функций.
Как-то так, ...
|
18.04.2018, 02:35 | #10 |
Регистрация: 18.04.2018
Сообщений: 3
|
Ув. Ленуся, так код на Паскале никто не пишет. Ни на Турбо ни на АБС.
Несколько советов по устранению ошибок: 1. Процедуры и функции в Паскале описываются не в теле основной программы, а сразу после раздела описания необходимых переменных, констант и прочих "описаний". 2. Чтобы с "type" не было проблем - уберите до "тайпа" ваши "Бегин" и "Райтэлены" и перенесите их к основной части программы, там где вы организуете выдачу основного меню. 3. По поводу описания переменной "i" - поставьте "var" между "for" и "i:=" во всех строках, где выходит эта ошибка, чтобы получилось так: for var i:=1 ... 4. В процедуре "Удаление" у вас написаны подряд два "Бегина" и самое удивительное, что при этом программа компилируется без ошибок. Значит вы где-то в процедуре поставили лишний "Энд". Причем далее в той же процедуре вы просто вставляете "Begin"-ы там где они вообще не нужны и также ставите лишние "End"-ы там же. Внимательно просмотрите эту процедуру(и не только эту) и уберите все ненужные Бегины и Энды. П.С. У меня печальный вывод: либо вы совсем не знаете Паскаль, либо у вас плохой учитель. Учите матчасть. Удачи! Последний раз редактировалось Chili777; 18.04.2018 в 02:43. Причина: Исправление опечаток |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Создать файл "Багаж", включающий в себя информацию:фамилия пассажира, количество и общий вес вещей, место следования. | Регааа | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 26.11.2014 16:23 |
Сформировать текстовый файл, содержащий сведения о сотрудниках предприятия (фамилия, имя, отчество, общий стаж...) (Delphi) | Kat9 | Помощь студентам | 2 | 03.03.2014 14:51 |
Структура элемента массива «пассажир»: фамилия, номер рейса, багаж - количество вещей, общий вес. Определить число пассажиров, кол | Masha Koks | Помощь студентам | 3 | 26.11.2013 19:00 |