4) Бить
5) 20
6) 1 - хлеб
7) 10111101
8) 10 МБ
1) Var a:integer;
Begin
Writeln('Введите число');
Readln(a);
If (a mod 2 = 0) then writeln('Введённое число чётное.')
Else writeln('Введённое число чётное');<span>
End.
2) </span>var A,A1,B,B1,C,C1:integer;
Begin
a:=4;b:=1;c:=7;
Writeln('Дан треугольник со сторонами A=4 B=1 C=7');
Writeln('Введите стороны треугольника A,B,C');
Readln(A1,B1,C1);
If (A=A1) and (B=B1) and (C=C1) then writeln('треугольники равны')
Else writeln('треугольники не равны');<span>
End.
3)</span>var x,y:integer;
Begin
write('Введите первый промежуток: '); readln(x);
write('Введите второй промежуток: '); readln(y);
if x<y then write('Отдаляется')
else write('Приближается');
<span>end.</span>
Ответ:
77₈ = 7*8⁰ + 7*8¹ = 63₁₀
73₁₆ = 3*16⁰ + 7*16¹ = 115₁₀
64₁₀ = 0*2⁰ + 0*2¹ + 0*2² + 0*2³ + 0*2⁴ + 0*2⁵ + 1*2⁶ = 1000000₂
114₁₀ = 0*2⁰ + 1*2¹ + 0*2² + 0*2³ + 1*2⁴ + 1*2⁵ + 1*2⁶ = 1110010₂
100₁₀ = 0*2⁰ + 0*2¹ + 1*2² + 0*2³ + 0*2⁴ + 1*2⁵ + 1*2⁶ = 1100100₂
Объяснение:
число С может быть от 1000000₂ до 1110010₂
например можно взять 100₁₀ = 1100100₂
всё реально просто!=45=0=45,0
Стандартная часть кодировочной таблицы ASCII Номер Символ Номер Символ Номер Символ Номер Символ 32 56 8 80 P 104 h 33 ! 57 9 81 Q 105 i 34 “ 58 : 82 R 106 j 35 # 59 ; 83 S 107 k 36 $ 60 < 84 T 108 l 37 % 61 = 85 U 109 m 38 & 62 > 86 V 110 n 39 ‘ 63 ? 87 W 111 o 40 ( 64 @ 88 X 112 p 41 ) 65 A 89 Y 113 q 42 * 66 B 90 Z 114 r 43 + 67 C 91 [ 115 s 44 , 68 D 92 \ 116 t 45 - 69 E 93 ] 117 u 46 . 70 F 94 ^ 118 v 47 / 71 G 95 _ 119 w 48 0 72 H 96 ` 120 x 49 1 73 I 97 a 121 y 50 2 74 J 98 b 122 z 51 3 75 K 99 c 123 { 52 4 76 L 100 d 124 | 53 5 77 M 101 e 125 } 54 6 78 N 102 f 126 ~ 55 7 79 O 103 g 127