Логические данные- это одно из двух значений( истина или ложь).
Первая:
<span>var </span>
<span>q,a,b:real; </span>
<span>begin </span>
<span>read(a,b); </span>
<span>q:=sqrt(a*a+b*b); </span>
<span>writeln(q:2:2); </span>
<span>end. </span>
<span>Вторая: </span>
<span>var </span>
<span>a:integer; </span>
<span>begin </span>
<span>read(a); </span>
<span>writeln('The next number for the numder ',a,' is ',a+1); </span>
<span>write('The previaus number for the numder ',a,' is ',a-1); </span>
<span>end. </span>
Ну отдыхает и че?.......,,.,,
1) 346 (8) - 64 (8) = 262 (8)
2) 1022 (16) - 5А (16) = FC8 (16)
3) 24ECI * 22 = 4E758 (16)