if s[i] < > s[length(s) - i + 1] then writeln("не палиндром")ж
Ответ дал: Гость
var i: integer;
s,v: real;
begin
read(i,v);
case i of
1: s: =pi*v*v;
2: s: =pi*v*v/4;
3: s: =v*v/pi/4;
end;
writeln(s);
end.
Ответ дал: Гость
расстояние от первого дома до пятого -40м я бы вырыла колодец около 3 дома-середина. тогда от 1 до колодца 20м и 10м от второго до 3.-с одной стороны 30м и с другой стороны 30м
Популярные вопросы