После слова begin:
Переменной s присвоено значение 0.
Дальше идет цикл, повторяющийся 7 раз для значений k: 6,7,8, ... ,12
При каждом проходе цикла переменная s увеличивается на 10, т.е в результате она увеличится на 7 * 10 = 70.
Т.к. в начале она была равна 0, то в конце ее значение будет 0 + 70 = 70.
1 Гбайт = 1024 Мбайта
1 Мбайт = 1024 Кбайта
1 КилоБайт = 1024 байта = 8192 бит
Ответ:
TWITTER
Объяснение:
Переводим последние 7 символов в 16-ричную форму:
1010100 = 54
1010111 = 57
1001001 = 49
1010100 = 54
1010100 = 54
1000101 = 45
1010010 = 52
Открываем таблицу ASCII (пользовался вики) и сопоставляем символы: 54 = T, 57 = W, 49 = I, 45 = E, 52 = R
P. S. Можно переводить не в 16-ричную, а сразу в десятичную, тогда будет:
1010100 = 84
1010111 = 87
1001001 = 73
1010100 = 84
1010100 = 84
1000101 = 69
1010010 = 82
и далее по Вашей таблице опять же получится TWITTER
Program A;
var x,y:integer;
begin writeln('Введите два числа:'); readln(x); readln(y); if x > y then writeln(x * x) else writeln(y*y);end.
Program Multy;
var i, n, x, mt:integer;
begin
write('введите целое число X ');
readln(x);
write('введите степень N ');
readln(n);
mt:=x;
for i:=1 to (n-1) do
begin
mt:=mt*x;
end;
writeln(x,' в степени ',n,' равно ',mt);
end.