=(C1-A1)*2
--------------------------------------------
9 л ведро набрать водой перелить в пятилитровое станет 5л и 4 л, потом вылить из пятилитр. ведра воду , и перелить из девятилитрового в пятилитровое 5 литра, в девятилитровом станет 4 литра ,перелить из 9 литров в пятилитровое. 1 литре, стпнетэ8л в девятилитровом и 5 л в пятилитровое, затем вылить воду из пятилитров. перелить из девятилитров. 5 литров в пятилитровое и в девятилитровом останется три литра
<em>// PascalABC.NET 3.2, сборка 1399 от 08.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadSeqReal(3).Select(x->x<0?sqr(x*x):x*x).Println
end.
<u>Пример</u>
3.18 -5.722 1.94
10.1124 1071.99167796866 3.7636
var
s: string;
begin
readln(s);
write(s.Split(' ')[0], ' ');
foreach s1: string in s.Split(' ') do
if (s1 <> s.Split(' ')[0]) then
write(s1, ' ');
<span>end.</span>