Что такое "Переменная" - 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;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д