var
a: array[0..9] of integer;
k, i: integer;
begin
k := 0;
for i := 0 to 9 do
begin
readln(a[i]);
if a[i] > 12 then k += 1;
end;
writeln(k);
end.
var
i,j,s:integer;
x:array[1..8,1..8] of integer;
y:array[1..10,1..10] of integer;
begin
s:=0;
for i:=1 to 8 do
for j:=1 to 8 do
begin
readln(x[i,j]);
if i<=j then s:=s+x[i,j];
end;
writeln("Сумма для X=", s);
s:=0;
for i:=1 to 10 do
for j:=1 to 10 do
begin
readln(y[i,j]);
if i<=j then s:=s+y[i,j];
end;
writeln("Сумма для Y=", s);
end.
как получилось:
777 делим на 16 столбиком, каждый раз смотря на остаток. последнее частное без остатка будет равняться 1 цифре искомого числа, и далее в обратном порядке пишем остатки от предыдущих частных.
777/16=48 (остаток 9)
48/16=3 (остаток 0)
3 - 1 цифра, далее остатки в обратном порядке 0 и 9, итого
Ответ:
пользователь
Объяснение:
ответ содержится в самом вопросе
S=740*60*80=3552000 символов
1. Если в кодировке 1 символ = 1 байт
V=3552000 байт ≈ 3,39 МБ
2. Если в кодировке UNICODE, то 1 символ = 2 байта
V=3552000*2 байт=7104000 байт ≈ 6,77 МБ