4-тапсырма***. Суретте берілген бөлменің өлшемдерін есепте, программасын құр.
1. Бөлменің еденінің ауданын тап.
2. Бөлменің периметрін есепте.
3. Бөлменің төрт қабырғасының ауданын тап.
4. Бөлменің көлемін есепте.
5. Бөлменің жалпы бетінің ауданын есепте.​

из 8 выливаем

из 5 вливаем в 8

набираем 5

из пяти снова выливаем в 8

в пяти остается 2

выливаем из 8

из 5 вливаем в 8

наливаем в 5

выливаем из 5 в 8

во второй получается 7 литров

сидерический год

14                                                                                                                       

varb: array [1..8] of integer; r,q: integer; begin  for r: =1 to 8 do  begin  q: =0;   read(b[r]);   end;   for r: =1 to 8 do  if b[r] mod 2=1 then q: =q+b[r];   writeln;   writeln('сумма нечетных чисел равна ',q); end.