Строковые переменные. Вам всего понадобится 420 морковок

Вам всего понадобится 420 морковок

Введите, пожалуйста, количество кроликов

END.

BEGIN

norma_krol:=2;

norma_slon:=100;

WriteLn ('Введите, пожалуйста, количество кроликов');

ReadLn (kol_krol);

kol_slon:=3;

vsego:= norma_krol * kol_krol + norma_slon * kol_slon;

WriteLn('Вам всего понадобится ',vsego, ' морковок');

ReadLn

Эта программа будет работать точно так же, как и предыдущая, с тем отличием, что во время паузы, вызванной оператором ReadLn (kol_krol), на экране будет гореть удобная надпись -

а результат будет выведен на экран в виде -

Оператор ReadLn без скобок в конце программы нужен для нейтрализации одной неприятной особенности в работе Паскаля. Дело в том, что выполнив программу, Паскаль торопится погасить экран с результатами решения задачи и делает это так быстро, что человек просто не успевает эти результаты разглядеть. Оператор ReadLn, поставленный после оператора WriteLn, выводящего результаты на экран, задает паузу. Во время этой паузы экран не гаснет, так как программа еще не выполнилась до конца, и человек может спокойно разглядеть результаты. После этого он нажатием клавиши Enter позволит компьютеру продолжить выполнение программы (в нашем случае после ReadLn стоит END с точкой, поэтому программа завершится).

Часто, впрочем, можно обойтись и без ReadLn. Нажав пару клавиш на клавиатуре (Alt-F5), мы можем снова зажечь погасший экран с результатами. В дальнейших примерах я буду для экономии места и "смысла" обходиться без ReadLn.

Задания 15-16:

Написать с использованием интерфейса программы решения задач:

15) Длина одной стороны треугольника равна 20. Длины двух других сторон будут известны только после запуска программы на выполнение. Вычислить периметр треугольника.

16) В компьютер вводятся путь, пройденный телом, и скорость тела. Найти время движения тела.

Сравним две программы:

VAR a: Integer; BEGIN a:=98; WriteLn(a) END.

VAR a: String; BEGIN a:='Привет всем!'; WriteLn (a) END.

В первой программе описание VAR a: Integer говорит о том, что переменная a обязана иметь числовое значение, а оператор a:=98 записывает в ячейку a число 98.

Во второй программе описание VAR a: String говорит о том, что переменная a обязана иметь строковое (текстовое) значение, то есть ее значением будет не число, а произвольная цепочка символов, например, Привет всем! или рпН2Н(*fD6:u. Оператор a:='Привет всем!' записывает в ячейку a строкуПривет всем!. Оператор WriteLn (a), поскольку он обязан всегда выводить на экран содержимое ячейки a, выведет на экран текст Привет всем!

Обратите внимание, что в программе текст должен браться в кавычки, а в памяти он хранится без кавычек и на экран выводится без кавычек.

Слово String читается "стринг", переводится "строка".

Какой смысл переменным иметь текстовое значение, выяснится в следующем параграфе.

Информация в ячейке памяти под строковую переменную может в процессе выполнения программы меняться точно так же, как и в ячейке для числовой переменной. Например, при выполнении фрагмента

a:='Минуточку!'; WriteLn(a); a:='Здравствуйте!'; a:='До свидания!'; WriteLn (a)

в ячейке a будут по очереди появляться строки

Минуточку! Здравствуйте! До свидания!

а на экран будут выведены строки

Минуточку! До свидания!

Строковую переменную можно задавать не только оператором присваивания, но и оператором ReadLn. Пример:

VAR a: String;

Дата добавления: 2014-12-27