Что такое "Переменная" - 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;