Қолдану 1. Кітаптың 300 беті және әр бетте 60 символдан тұратын 45 қатар бар. Осы
кітаптың көлемін Кб және Мб өлшемдерге ауыстырыңдар (1 символ = 1 байт деп
есептеңдер).
2. Асхатта көлемі 8 Гб-ты құрайтын флэш-жад бар. Асхат флэш-жадқа әр
бетінде 50 қатар, әр қатарында 40 символы бар 400 беттік кітаптің электронды
нұсқасының қаншасын сақтай алады? (1 символ = 1 байт)
3. Жедел жадттың көлемі 512 Мб, ал қатқыл диск көлемі 120 Гб. Қатқыл
дисктің көлемі жедел жадтан қанша есе артық екенін есептеу арқылы табыңдар.
4. 5 Мб ақпаратты 64 Кб/с жылдамдықпен тасымалдау үшін қанша уақыт
қажет? Ал, 5 Гб үшін қанша уақыт кетеді?

выручайте, реально сложно​

vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.

программа, выводящая на экран номер четверти координатной плоскости, которой принадлежит точка с координатами х≠0 и у≠0

  program 198;

var x,y: real;

begin;

readln (x; y);

if x> 0 and y> 0 then

writeln (1 chetvert);

end;

if x< 0 and  y> 0 then

writeln (2 chetvert);

end;

if x< 0 and  y< 0 then

writeln (3 chetvert);

end;

if x> 0 and  y< 0 then

writeln (4 chetvert);

end;

end.

если его поставить так, чтоб краев рядом не было, куда-нибудь в центр. тогда он всегда будет вертется

var a: array [1..10] of real;

s,i: integer;

begin

  {vvod tablicy}

  for i : = 1 to 10 do

      if a[i]< > 0 then s: =s+1;

  writeln(s);

end.