11 Скласти програму в Паскаль

Швидкість катера за течією річки становить х км/год, а швидкість

течії – у км/год. Знайдіть власну швидкість катера та швидкість

катера проти течії річки, склавши програму

var

 boatV, boatMinusRiverV, boatPlusRiverV, riverV: real;

begin

 writeln('Введите скорость катера по течению: ');

 readln(boatPlusRiverV); // x

 writeln('Введите скорость течения: ');

 readln(riverV); // y

 boatV := boatPlusRiverV - riverV;

 boatMinusRiverV := boatV - riverV;

 writeln('Скорость лодки: ', boatV,  

         ' км/ч. Скорость лодки против течения: ', boatMinusRiverV, ' км/ч.');

end.