Задача решается с помощью составления обычной пропорции (см. рисунок).
Ответ:
Есть программа FCEditor, рисует блоксхемы по коду в Pascal
Объяснение:
Странно, что решили только одну задачу. Они ведь все однотипные.
2.
Количество символов в статье = 28*72*48
Объем статьи:
28*72*48*16 бит = 28*72*48*16/8 байт = 28*72*48*2/1024 Кбайт = 189 Кбайт
3.
Количество символов в докладе = 8*32*64
Объем доклада:
8*32*64*16 бит = 8*32*64*16/8 байт = 8*32*64*2/1024 Кбайт = 32 Кбайта
4.
Количество символов в рассказе = 4*48*64
Объем рассказа = 4*48*64*8 бит = 4*48*64 байт = 4*48*64/1024 Кбайт = 12 Кбайт
5.
В предложении 47 символов.
Объем = 48*16 бит = 47*16/8 байт = 64 байта
Var
n, s: integer;
begin
readln(n);
s := n mod 10 + n div 10000;
writeln(s);
end.
===== PascalABC.NET =====
begin
var n := ReadlnInteger;
var a := ReadArrInteger(n);
var s1 := a[0::2].Sorted;
var s2 := a[1::2].SortedDescending;
var s3 := s1.Interleave(s2);
if n.IsOdd then
s3 := s3 + s1.Last;
a := s3.ToArray;
a.Println;
end.