Задачи:
Справедливы ли следующие утверждения?
Если с є char и ‘0’<c<’9’, то с- цифра
‘0’=0
‘f’=’F’
succ(‘0’)=pred(‘2’);
Вычислить значения:
Pred(‘7’)=’6’
Ord(‘A’)-ord(‘0’)=65-48=17
Succ(0)=1
Chr(ord(‘5’)+1)=’6’
Имеется литерная переменная с и логическая переменная t, присвоить переменной t true, если выполнится заданное условие и false, если условие не выполняется.
С- литера*
С- литера ‘a’ или’q’
C- заглавная латинская буква
С- цифра
Определить значение литерной переменной d после выполнения операторов:
C:=’1’; d:=c;
C:=’1’; d:=’c’;
Имеются описание типов и переменных:
Type season=(win, spr, sum, out);
Var x,y: season;
t:(heat, cold)
Можно ли присвоить?
X:=leto;
X:=win; y:=sum;
T:=out;
X:=y;
T:=x;
Верно ли, что
Sum>spr
Sum=out
win<=out
succ(sum)= out
Верно ли описаны типы:
Bukva=(‘a’, ‘b’, ‘c’, ‘d’)
Glasnya=(a, i, o, e, y,)
Soglesnaya=(b..d, f, g)
Logiski=Boolean;
digitC=’0’..’9’
digitN=0..9
const n=180; type ugol=-n..n;
