Need a unique gift idea?
A Pastebin account makes a great Christmas gift


a guest Nov 16th, 2018 86 Never
Upgrade to PRO!
ENDING IN00days00hours00mins00secs
  1. // Задача 5
  2. var
  3.   a,b,c :integer;
  4. begin
  5. writeln('Введите три числа');
  6. readln(x,y,z);
  7. if a < b then  a:=b;
  8. if a < c then  a := c;
  9. writeln('Наибольшее число = ', a);
  10. readln;
  11. end.
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand