1. var a, b :real;
begin readln(a, b); writeln(sqrt(a*a + b*b)); end.
2. var s1, s2, a1, a2 :real;
begin readln(s1, s2);
if s1 / 3.14159265 < s2 / 4 then writeln('yes') else writeln('no');
end.
3. var x, y :real;
begin readln(x);
if x < -10 then y:=234 - x*x*x else y:=x * x + 54;
writeln(y);
end.
Аххах, только что это же решал... Верный ответ узнаешь через несколько месяцев, как сказал УРА... (а про Южную Корею все правильно)
var
y: <em>real</em>;
begin
read(y);
writeln(System.Math.Pow(System.Math.Tan(<em>y * Pi / 180</em>), 3));
<span>end.</span>
Да, поместятся.
2 ГБ - 2000 мб.
151*3=453 мб.
Поместится :)
В 1948 году Клод Шеннон предложил использовать слово "Бит" для обозначения наименьшей единицы информации. Удачи вам в учебе!