Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
DevioLab
CRYPTO TRADING AUTOMATION
LIVE
AUTOMATED CRYPTO TRADING • BINANCE
Автоматизуйте свій
криптопортфель
Торгові боти DevioLab аналізують крипторинок,
автоматично відкривають і закривають позиції
та керують вашим портфелем на Binance 24/7.
CRYPTO
80 Bots
BINANCE
Spot Trading
TRADING
24 / 7
deviolab.com
Як зробити меню програми (Pascal) - відповідь
Інформація про навчальний заклад
ВУЗ:
Інші
Інститут:
Не вказано
Факультет:
Не вказано
Кафедра:
Не вказано
Інформація про роботу
Рік:
2012
Тип роботи:
Інші
Предмет:
Програмування
Частина тексту файла (без зображень, графіків і формул):
{
procedure menu;
Begin
ClrScr;
Writeln;
Writeln(' <<<Меню Програми>>>');
Writeln;
Writeln(' ------------------------------------');
Writeln(' 1. Створити файл та внести інформацію.');
Writeln(' 2. Вивести на екран інформацію з файлу.');
Writeln(' 3. Додати інформацію у файл.');
Writeln(' 4. Відправлення потягу у місто X.');
Writeln(' 5. Виделення файлу.');
Writeln(' 6. Прибуття потягу у місто Х з часом Y.');
Writeln(' 0. Вихід.');
Writeln(' ------------------------------------');
Writeln;
Write(' Ваш вибір: ');
Readln(Sel);
Case Sel of
1:CreatFile;
2:ReadFile;
3:Add;
5:delete;
0:Halt;
End;
end;
}
09.11.2012 21:07
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора