Var a,b,c:integer;begin readln(a); readln(b); readln(c); writeln((a+b+c)/3);end.
Var a:array[1..3,1..4] of integer;
i,j,s:integer;
begin
for i:=1 to 3 do begin
for j:=1 to 4 do begin a[i,j]:=random(20)-10; write(a[i,j]:4);end;writeln;end;
for j:=1 to 4 do begin
s:=0;
for i:=1 to 3 do s:=s+a[i,j]; writeln('cумма ',j, ' столбца=',s);end;
<span>end.</span>
Ну зависит от языка,в паскале - <span>read и readln и вывода write и writeln</span>
1) Начало
2) Ввод a, b, c
3) Если (a = -b) или (a = -c) или (b = -c), то ответ ДА. Иначе ответ НЕТ.
4) Вывод ответа
5) Конец
Пусть объём 1го файла - 2х (2 т.к. стереозапись),
тогда пропускная способность первого канала - 2х/18.
после второй оцифровки файл был записан в формате моно (то есть уменьшился вдвое) и стал просто х, после улучшения разрешения увеличился вдвое и стал 2х, после увеличения частоты дискретизации увеличился вдвое еще раз и стал наконец 4х (объём второго файла).
пропускная способность 2го канала в 5 ниже т.е (2х/18)/5= 2х/90= х/45.
чтобы узнать сколько времени затратилось на передачу файла объёмом 4х с пропускной способностью х/45, разделим объём на пропускную способность:
4х/(х/45)= 4*45=180 секунд