Определите значение переменной «a» после выполнения фрагмента программы:a = 10 if a 5: a += 12 else: a -= 7 if a > 5: a += 12 else: a -= 7 ( : 1) 5.Определите значение переменной «a» после выполнения фрагмента программы: a = 10 if a b: b += 12 else: a -= 7 if a > b: a += 12 else: a -= 7 ( : 1) 8. Определите значение переменной «a» после выполнения фрагмента программы

80 * 60 = 4800 символов на 1 странице

4800 * 450 = 2160000 символов в книге

обычно 1 символ кодируется 1 байтом информации, значит

в книге 2160000 байт, переведем их в мегабайты

2160000 : 1024 = 2109,375 кб (килобайт)

2109,375 : 1024 = 2,06 мб (мегабайт)

следовательно рукопись на 1 дискету не поместится, для нее необходимо 2 дискеты.

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

qbasic

screen 7

input x

input y

input c

s=x+y/2*c

print "x+y/2*c="; s

end