// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadlnReal2; Writeln(a/b);
var s1:=ReadlnString; var s2:=ReadlnString; Writeln(s1+s2);
(a,b):=ReadReal2;
if (a>5) and (b>5) then Writeln(a+b) else Writeln(a-b)
end.
Пример
3.53 -1.9
-1.85789473684211
Моя
строка
Моястрока
4.13 28
-23.87
y:=(5*x*x-4)/(7*x+2);
л:=z+2*a;
a:=Sqrt((b+c)/(5*b*c))-b*b/2/c;
y:=Sqr(Sin(x/2))-Cos(2*x);