1)
var
Sk, Ss, R, A : integer;
begin
read(R, A);
Sk := pi*R*R;
Ss := A*A;
If Sk > Ss then write ('Площадь круга больше')
else
If Ss > Sk then write ('Площадь квадрата больше')
else write <span>('Площади равны')
</span>end.
2) не знаю
Log2(64) = 6 битов на символ. А байт у нас 8-битовый. Естественно, только дeбил будет один символ разносить по разным байтам. Поэтому на символ у нас один байт. Соответственно, текст занимает 800 байтов.
126/2 =63 остаток 0
63/2=31 остаток 1
31/2=15 остаток 1
15/2=7 остаток 1
7/2=3 остаток 1
3/2=1 остаток 1
1
записываем число из остатков деления в обратном порядке
ответ 1111110
Левая часть выражения является истинной только если x=0 и y=0
Правая часть выражения является истинной только если x=1 и y=0
Значит при любых значениях x и y жанное выржение будет равно 0.
Ответ: 0
На языке Паскаль переменные записываются в разделе описаний
Основные типы переменных:
- Integer - целочисленный
- real - вещественный
- string - строковый
- char - символьный
- boolean - логический
- array - массив
Также есть типы byte, word, longint, double.