👤

Turbo Pascal-ajutor urgent
Se considera un nr x. Sa se scrie un program care determina restul impartirii numarului x la 5.


Răspuns :

Program Augustin;
r:real;
x:integer;
begin
Writeln('Introdu numarul X');
readln(x);
r:=x mod 5;
Writeln('Rezultatul=',r);
readln;
end.