Подякувати Студентському архіву довільною сумою
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
Лабораторна робота №7
Інформація про навчальний заклад
ВУЗ:
Ужгородський національний університет
Інститут:
Не вказано
Факультет:
Програмна Інженерія
Кафедра:
Не вказано
Інформація про роботу
Рік:
2018
Тип роботи:
Лабораторна робота
Предмет:
Основи програмування та алгоритмічні мови
Частина тексту файла (без зображень, графіків і формул):
ДЕРЖАВНИЙ ВИЩИЙ НАВЧАЛЬНИЙ ЗАКЛАД
“УЖГОРОДСЬКИЙ НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ”
Факультет інформаційних технологій
Лабораторна робота №7
Лабораторна робота №7.
Тема: Вивід на екран текстової інформації.
Мета: Вивчення процедур та функцій для відображення текстової інформації.
Вивчити питання: Встановлення текстових режимів. Управління рядками екрана. Вивід на екран. Управління курсором. Текстові вікна. Управління клавіатурою. Управління звуком.
ЗАВДАННЯ ДО РОБОТИ:
Варіант 3
Згенерувати натуральне випадкове число N. Вивести число N на екран, при цьому позначити синім кольором цифри числа , що є парними числами.
ХІД РОБОТИ
uses crt;
var
n: Word;
s: String;
begin
Randomize;
n:=Random(65535);
Str(n,s);
for n:=1 to Length(s) do begin
if Odd(Ord(s[n])-Ord('0')) then TextColor(7) else TextColor(9);
Write(s[n]);
end;
WriteLn;
end.
/
ВИСНОВОК
За допомогою даної лабораторної роботи я вивчила процедури та функції для відображення текстової інформації.
Також розглянула такі питання: встановлення текстових режимів, управління рядками екрана, вивід на екран, управління курсором, текстові вікна, управління клавіатурою, управління звуком.
03.05.2018 21:36
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора