Решение задачи Begin 35

#include <stdio.h>

int main(void)
{
    float V,U,T1,T2;
    printf("V:");
    scanf ("%f", &V);

    printf("U:");
    scanf ("%f", &U);

    printf("T1:");
    scanf ("%f", &T1);

    printf("T2:");
    scanf ("%f", &T2);

    float S;
    S=V*T1+(V-U)*T2;

    printf("S:%f\n",S);

    return 0;
}

import random

U,V = sorted(random.sample(range(10, 21), 2))
T1,T2 = [random.randrange(1,6) for i in range(2)]
Distance_Lake = V * T1
Distance_River = (V - U) * T2 

print("Speed in the lake:",V)
print("Speed of the river:",U)
print("Speed in the river (up the stream):",V-U)
print("Time in the lake:",T1)
print("Time in the river:",T2)
print("Path in the lake:",Distance_Lake)
print("Path in the river:",Distance_River)
									

program Begin35;
var
  V,U,T1,T2,S: Real;
begin
  Write('Введите скорость лодки в стоячей воде: ');
  Readln(V);
  Write('Введите скорость течения: ');
  Readln(U);
  Write('Введите время движения лодки по озеру: ');
  Readln(T1);
  Write('Введите время движения лодки по реке(против течения): ');
  Readln(T2);
  S:=V*T1+(V-U)*T2;
  Writeln('Лодка прошла путь равный: ',S);
end.