Var
a:integer;
begin
writeln('a ?');
readln(a);
if (a mod 10)=(a div 100) then
writeln('Yes')
else
writeln('N');
end.
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(с)
Зона с охватом Wi-Fi ну как то так