C8 CD D4 CE D0 CC C0 D2 C8 C7 C0 D6 C8 DF
Учитывая, что тут больше FF не будет (256 символов, включая нулевой), можно убрать пробелы =)
// Выбирайте, тут три цикла, while, repeat и for
//------------------------
program LoopWhile;
begin
var (a, b) := (-10, 10);
while a <= b do
begin
Println(a, Abs(a));
a += 1
end;
end.
//------------------------
program LoopRepeat;
begin
var (a, b) := (-10, 10);
repeat
Println(a, Abs(a));
a += 1
until a > b;
end.
//------------------------
program LoopFor;
begin
var (a, b) := (-10, 10);
for var i := a to b do
Println(i, Abs(i));
end.
40*16=640 символов в строках
640*8=5120 символов на 8 страницах
5120/2=2560 байт на 8 страницах
1Кбайт=1024 байт
2560/1024=2.5Кбайт
{Данная программа переводит любое сочетание символов ASCII в систему счисления заданную пользователем.}
//Pascal ABC.NET v3.0 сборка 1111
var
a,i,b,r,n,j,bug:integer;
s,se,slo,slof:string;
procedure preob(var a,b,n:integer; var se:string);
begin
repeat
b:=a mod n;
a:=a div n;
str(b,se);
s+=se;
until (a<=n-1);
end;
beginreadln(slo);
readln(n);
for j:=1 to length(slo) do
begin;
a:=ord(slo[j]);
preob(a,b,n,se);
str(a,se);
s+=se;
for i:=1 to length(s) div 2 do
begin;
se:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=se[1];
end;
write(s,'-');
slof:=slof+s;
delete(s,1,length(s));
end;
end.
Пример ввода:
Домашняя работа на завтра.
2
Пример вывода:
11000100-11101110-11101100-11100000-11111000-11101101-11111111-11111111-100000-11110000-11100000-11100001-11101110-11110010-11100000-100000-11101101-11100000-100000-11100111-11100000-11100010-11110010-11110000-11100000-101110-
{Таким образом, фразу "Домашняя работа на завтра." можно закодировать как "11000100-11101110-11101100-11100000-11111000-11101101-11111111-11111111-100000-11110000-11100000-11100001-11101110-11110010-11100000-100000-11101101-11100000-100000-11100111-11100000-11100010-11110010-11110000-11100000-101110-".}
До посинения можно говорить о новых спортивных играх. Но давайте поговорим о городских подростковых играх. Об этом рассказывает множество книг и фильмов, но не смотря на это, интерес к таким играм не утихает. Вам знакомо название "Схватка"? Наверняка знакомо, и, может быть, вы даже в нее играли. А если нет, обратите внимание - на многих машинах есть такие наклейки.
<span> </span>
"Схватка" подразумевает открытость игр или закрытость. В открытых могут участвовать все, кто только пожелает. А вот в закрытых - только зарегистрированные участники. Да и задания в этом случае более сложные, например, наличие машины с наполненным бензиновым баком, мобильник и координатор, сидящий в интернете. Он сообщает задания только по сотовому телефону. Начинаются такие игры после наступления сумерек - темнота есть друг молодежи. Фишка этой игры - находить шифры, коды, и двигаться, двигаться. Бежать, даже неважно, куда. Движение - жизнь.
Есть еще одна игра - Encounter. Уж это-то вы наверняка слышали. У игроков даже есть свой словарь, из сорока слов. В игре есть уровни, всего четыре. Последовательный, непоследовательный, последовательность случайная и штурмовая. Т.е., команда получила задание, ну а как их выполнять - сугубо их дело.
Ну, и фотоигра. Смысл понятен. Это что-то вроде фотокросса, когда за определенное время вы пытаетесь найти тот сюжет, который впишется в задание. А заданий несколько. Потом все фото отправляются на стол к судьям, которые принимают решение - чей же снимок лучше.