Что такое "Переменная" - Free Pascal
Формулировка задачи:
Текст программы(Выводит ASCII символы).
Я только начал изучать Паскаль и сразу возникли проблемы с переменными. Что это такое? Всё что я понял, это то что это определенно выделенный участок памяти.
Но в таком случае какие манипуляции с переменными проводятся тут? Что значит в данном случае умножение и сложение?
Этот участок программы вообще непонятен
program ASCII_TABLE; uses CRT; var i : byte; j : byte; ch : byte; st : string[8]; begin GoToXY(2, 2); Write('Код Симв. Код Симв. Код Симв. Код Симв. '); Write('Код Симв. Код Симв. Код Симв. Код Симв. '); for j := 0 to 7 do for i := 0 to 15 do begin GoToXY(j*10+2, i+4); ch := i+(j*16); if ch < 10 then st := ' ' else if ch < 100 then st := ' ' Write(ch, st, Chr(ch)); end; GoToXY(2, 22); Write('Чтобы посмотреть следующую страницу, нажмите ENTER'); Readln; ClrScr; GoToXY(2, 2); Write('Код Симв. Код Симв. Код Симв. Код Симв. '); Write('Код Симв. Код Симв. Код Симв. Код Симв. '); for j := 0 to 7 do for i := 0 to 15 do begin GoToXY(j*10+2, i+4); ch := i+(j*16) + 128; if ch < 10 then st := ' ' else if ch < 100 then st := ' ' else st := ' '; Write(ch, st, Chr(ch)); end; GoToXY(2, 22); Write('Нажмите ENTER для выхода из программы'); Readln; end.
GoToXY(j*10+2, i+4); ch := i+(j*16); if ch < 10 then st := ' ' else if ch < 100 then st := ' ' Write(ch, st, Chr(ch));
if ch < 10 then st := ' ' else if ch < 100 then st := ' ' Write(ch, st, Chr(ch));
Решение задачи: «Что такое "Переменная"»
textual
Листинг программы
a := 6;
Объяснение кода листинга программы
- Объявление переменной
a
типацелое число
и присвоение ей значения 6. a := 6;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д