B:=5.8
A:=-7.9
Сначала мы присваиваем значение A:=5.8 и B:=-7.9
Потом мы присваиваем значение B к A и A к B
#include <iostream>
#include <math.h>
using namespace std;
int main()
{
int N,K = 0;
cin >> N;
K=sqrt(N);
cout << K << endl;
<span>}</span>
За основу взят алгоритм, изложенный в "Bикипедии" и найденный по запросу "Наибольшая общая подстрока".
Процедура переделана из C# реализации алгоритма, приведенного там же.
<em>// PascalABC.NET 3.2, сборка 1325 от 19.10.2016</em>
function MaxSubstr(s1,s2:string):string;
begin
var a:=new integer[s1.Length+1,s2.Length+1];
var u:=0; var v:=0;
for var i:=0 to s1.Length-1 do
for var j:=0 to s2.Length-1 do
if s1[i+1]=s2[j+1] then begin
a[i+1,j+1]:=a[i,j]+1;
if a[i+1,j+1]>a[u,v] then begin u:=i+1; v:=j+1 end
end;
Result:=s1.Substring(u-a[u,v],a[u,v])
end;
begin
var a:='trapperkaperkatrter';
var b:='appekaperspamer';
Writeln(MaxSubstr(a,b))
end.
Тестовое решение
kaper
Ладно смотрите пример во вложении. Проверяйте спрашивайте. Я контроль значения параметра a добавил.
Считаем
4(-3+1+1)=-4 (х)
4(-4+3-2)=-12 (у)
Чтобы вернуттся в исходную точку нужно поменять знаки.
Т.е. ответ: 4)(4,12)