Если х единица выводим x (на экране будет 1)
если x двойка выводим x+1 (на экране будет 2)
иначе читаем(вводим) m
конец.
Vc =8Мбит/с =1Мбайт/с - пропускная способность спутника
vт =256Кбит/с =32Кбайт/с -скорость передачи с телефона
Один фрагмент передачи информации 1Мбайт,
Нужны 40Мбайтов. Всего 40 фрагментов передачи информации.
1 фрагмент состоит из:
1) Васин запрос длится 64Кбайта : vт =64:32 =2(с)
2)передача со спутника: 1Мбайта :vc =1:1=1(c)
время передачи одного фрагмента =3с
время передачи сорока фрагментов = 40*3 =120(с)
var s: string;
i: integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i]='o' then s[i]:='a';
write(s);
end.
//Z(x)=cos(2x)sin(x),если переменная х меняется в интервале [-5;5] с шагом hx=0.345
PROGRAM B07;
CONST
min=-5;
max=5;
hx=0.345;
VAR
x,z,k:real;
BEGIN
x:=min;
while (x<=max) do begin
writeln ('x=', x:6:3, ' ', cos(2*x)*sin(x), ' ' );
x:=x+hx;
end;
END.
Собака родовое все остольные видовые