Сад (растения, садовник)
Река (вода, берег)
Игра (игроки, правила)
Вводишь А и Х- получаешь Y.
var
a,x,y:real;
begin
writeln('Введите A и X');
readln(a,x);
y:=(sqr(x)+sqr(a))/(1-sin(ln(sqr(x))));
writeln('Y = ',y);
<span>end.</span>
Я пошёл в школу-истинное.Я не пошёл в школу-ложное.
1. 1100 : 11 * 100 = 10000
2. 1100 * 10 * 10 - 110000 = 0
<em>
// PascalABC.NET 3.2, сборка 1381 от 04.02.2017</em>begin
var a:=ReadReal('a=');
if a>0 then Writeln(0.4*ln(a):0:4)
else Writeln('Логарифм не существует')
end.
<u>Пример</u>a= 2.543
0.3733