Program n1;
var a,b: real;
begin
readln(a,b);
writeln(a+b);
write(a-b);
end.
40 строк *60 символов = 2400 символов на одной странице
8 бит = 1 байт
16 Гб= 16* 1024 Мб= 16*1024*1024 кб=16*1024*1024*1024 байт = 17179869184 байта
17179869184 / 2400 = 715878,8 страниц
715878,8 /100 =71583 см
Кажется, так.
Подробнее - на Znanija.com -
znanija.com/task/8906879#readmore
Эл. там только положительный заряд, пр. все зряды
Объем сообщения при использовании 16-битной кодировки:
10*16 бит = 160 бит = 20 байт
при 8-битной кодировке: 10*8 = 80 бит = 10 байт
Ответ: Объем сообщения уменьшился в 2 раза (с 20 байт до 10 байт)
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := ReadReal('x=');
var y := x < 1 ? 2 * x + 1 : 3 * x - 1;
y.Print
end.