В. объект не будет отображаться на слайде
===== PascalABC.NET =====
begin
var F: real-> real := n -> Sqrt(n) + n;
F(ReadReal('n =')).Println
end.
Photoshop,Gimp 2,На телефоны Glitchr,SLMMSK
Для хранения информации наверное
Так понимаю, консольный Delphi - это Pascal?)
var x, y, a, k: real;
begin
readln(a, y);
if (a > y) then
begin
x := a / 100;
writeln(x);
end;
if (a < y) then
begin
k := 100 * abs(a);
writeln(k);
end;
<span>end.</span>