Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 3; если нулевым, то заменить его на 12. Вывести полученное число.
O program zadaca;
var
а: integer;
begin
writeln('Введи число а');
readln(a); ;
if a >=0 then
if a=0 then a:=12 else a:=a+1
else a:=a-3;
end.
O program zadaca;
var
begin
writeln('Введи число а');
readln(a);
If a > 0 then
If аѕ0 then are12 else a:a+1
else a:-a-3;
writeln(a);
readln; ;
end
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var x:=ArrRandom(n,-5,25); x.Println;
var y:=ArrRandom(n,-5,25); y.Println;
var z:=x.Zip(y,(p,q)->p-q).ToArray; z.Println;
var s:=z.Sum;
var c:=s<0 ? 'отрицательный' : s=0 ? 'отсутствует' : 'положительный';
Writeln('Сумма равна ',s,', знак суммы ',c)
end.
Пример
n= 13
2 -5 24 3 23 22 -3 6 -3 -2 9 25 8
17 9 11 8 0 -2 -2 2 25 19 16 21 -4
-15 -14 13 -5 23 24 -1 4 -28 -21 -7 4 12
Сумма равна -11, знак суммы отрицательный
Если не принимать во внимание то, что иллюстрации тоже занимают место в «рукописи», то получаем объем, занимаемый текстом 4096*1024*128*16=8 589 934 592 бит занимает текст, для того, чтобы получить количество байт необходимо это число разделить на 8, т.к. в одной байте 8 бит. Получаем 1 073 741 824 байт. Далее, чтобы получить килобайты надо полученное число разделить на 1024. Получим 1 048 576 кБ. Чтобы получить мегабайты, делим килобайты на 1024. Получаем 1024 мегабайт или 1 гигабайт (т.к. 1 гигабайт = 1024 мегабайт).
Далее считаем объем, занимаемый иллюстрациями:
2520*3=7560 мегабайт. Делим на 1024 и получаем 7,3828125 гигабайт.
Складываем полученные суммы: 1+7,3828125=8,3828125 гигабайт. Что превышает объем флеш-карты. Соответственно в несжатом виде «рукопись» не поместится.
2)
а) Из предыдущей задачи мы знаем, что символ кодируется 16 битами. Соответственно, чтобы получить объем, занимаемый одной книгой перемножаем 256*128*64*16=33 554 432 бита = 4 194 304 байта = 4 096 кБ = 4 мегабайта. Чтобы узнать сколько книг поместится на жесткий диск необходимо объем жесткого диска умножить на 1024 (получим объем в мегабайтах): 160 Гбайт *1024 = 163 840 мегабайт. Теперь делим объем жесткого диска на объем одной книги: 163 840 / 4 = 40 960 книг.б) Теперь перемножаем количество книг на 3 сантиметра и получаем высоту стопки книг: 40 960*3=122 880 см.