таблицей 8. CD объёмом 700 Мб весит 15 г. Сколько будет весить набор таких дисков, необходимый для полного копирования инфор- мации с жёсткого диска объёмом 320 Гбайт?

04₁₀ = 100₂

10₁₀ = 1010₂

1996₁₀ = 11111001100₂

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

program zadacha2;

  uses crt;

  var i,n,a: integer;

            b,y,c,l: real;

begin

clrscr;

readln(n);

  a: =1;

  b: =2;

  c: =5;

  for i: =1 to n do                                                                                          

                                                                                                  begin  

if a mod 2 = 0 then

l: =a+b/c

else          

l: =a-b/c;

a: =a+1;

b: =b+2;

c: =c+5;

y: =y+l;

                                                                                                    end;

writeln(y: 2: 2);

readkey;

  end.

первую по подробней расспишите

var alpha: real;

begin

  read(alpha);

  if alpha > 90 then write("tupougolnyj");

  if alpha = 90 then write("prjamougolnyj");

  if alpha < 90 then write("ostrougolnyj");

end.