Advertisement
Varvara_Golovnova

Untitled

Jan 4th, 2025
14
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.15 KB | None | 0 0
  1. var
  2. a : array [1..100] of real;
  3. x1,x2,y1,y2,sum : longint;
  4. begin
  5. readln(x1, y1);
  6. readln(x2, y2);
  7. sum:=y2-x1;
  8. writeln(sum:0:2);
  9. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement