На паскале точно все запятые там и ; не помню но как-то так вот.
var a, b, c, d
begin
a:=2;
b:=3;
c:=4;
if a>7 then d:=b + c
writeLn (d<span>);</span>
end.
7200 * 8 = 57600 Кбит
<span>57600 / 196,608= ~300 сек = ~5 мин
Ответ: 5 минут</span>
Первый - аналоговый сигнал.
Второй - цифровой сигнал.
Var
i, s: integer;
begin
s := 0;
for i := 10 to 99 do
if i mod 2 = 0 then
s := s + i;
writeln(s);
end.