1,5 и 4 потому что X и У не могут быть одинаковыми
Ну суммарный трафик получается 2 * 4 + 5 * 2 = 18 килобайтов в день. А когда обнаружат... Ну, наверное, когда Вася поменяет ориентацию обратно или же начнёт вымогать слишком большие суммы (в таких случаях зачастую уже другие люди трафик считают). Так что просто умножишь 18 на продолжительность этой виртуальной содомии, и всё.
var
R,S:real;
begin
readln (R);
S:=3.14*R*R;
writeln (S);
end.
29. На узких полосках пальмовых листьев.
30. Чернилами из сажи.
31. В листьях делали отверстия и вставляли веревочки.
34. На египетскую.
35. Тысячи.
36. Красиво и грамотно.
//я так понимаю, речь идёт о монотонном возрастании
var ar:array[1..10] of integer;
i:integer;
begin;
for i:=1 to 10 do
readln(ar[i]);
for i:=2 to 10 do
begin;
if ar[i]<ar[i-1] then
begin;
writeln('Не возрастает');
exit;
end;
end;
writeln('Возрастает');
<span>end. </span>