Символьные переменные
1. Определите результат программы:
Program Pr1;
var i, j: char;
Begin
For i:=’a’ to ‘f’ do
For j:=’a’ to i do
write(upcase(j));
End.
2. Какое значение принимает переменная s после выполнения таких операторов:
- · s:=’a’; i:=ord(s)+3; s:=succ(chr(i));
- · s:=’d’;
for i:=’a’ to ‘c’ do s:=pred(s);
3. Напишите программу вывода на экран последовательности символов:
|
aA bB cC … zZ
|
a ba cba … zyx…a
|
ZZZ…ZZ YY …Y X …X … A
|
4. С клавиатуры вводится последовательность произвольных символов. Признак окончания ввода – символ ‘.’. Определите, каких символов ‘$’ или ’р’ (долларов или рублей) больше.
5. С клавиатуры вводится последовательность символов. Признак окончания ввода – символ ‘.’. Подсчитайте количество цифр в ней.