Подсчитайте размер видеофрагмента длительностью 30 с, состоящего изотдельных JPEG-файлов размером в 500 кБ каждый. Частоту смены кадровсчитатьравной 24 с. ответ выразите в мегабайтах.Введите ответ:МБ​

Информатика для меня как маленький лучик который даёт и свет и знания.

В Информатике я могу научиться пользоваться компьютером и может быть я в будущем стану програмистом. Щас великая роль информатики развития общества,веть если нет информации значит нет и разговора.Щас мир быстро меняется мы не знаем что может случится через два-три года вдруг мы успеем сделать машину времени или телевизор который может скручиваться как ковёр.Может быть то что мы придумаем не решит все наши проблемы,но решит что будем делать в дальнейшем будущем.

Информация это золото в недрах камнях,чтобы овладеть полностью информации нужно века чтоб докапать всё золото.

PascalABC.Net
var
  x,y,z:integer;
  m:single;
begin
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m)
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-0.3

Borland Pascal 7.01
uses Crt;
function max(m,n:integer):integer;
begin if m>n then max:=m else max:=n end;
function min(m,n:integer):integer;
begin if m<n then min:=m else min:=n end;
var
  x,y,z:integer;
  m:real;
begin
  ClrScr;
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m);
  ReadKey
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-3.0000000000E-01