新手村之洛谷的第一个任务

P1001 A+B Problem 代码 ：

var
  a,b:longint;
begin
  readln(a,b);
  write(a+b);
end.

P1421 小玉买文具 代码：

var
  a,b:real;
begin
  readln(a,b);
  write(trunc((a+b/10)/1.9));
end.

P1425 小鱼的游泳时间 代码：

var
  a,b,c,d:longint;
begin
  readln(a,b,c,d);
  if dthen
    begin
      d:=d+60;
      c:=c-1;
    end;
  write(c-a,' ',d-b);
end.

总结：

暴力就好。