program xyz; var N:real; c,f:longint; a,b:longint; begin readln(N); if (N=trunc(N)) then begin N:=trunc(N); writeln(N:0:0,' ',N:0:0); end else if (N<0) then begin c:=trunc(N); f:=c-1; writeln(f,' ',c); end else begin f:=trunc(N); c:=f+1; writeln(f,' ',c); end; readln ;readln end.
Selasa, 07 Agustus 2012
BAB 1B : Percabangan - Floor and Ceiling
Solusi BAB 1B : Percabangan - Floor and Ceiling
Langganan:
Posting Komentar (Atom)
Ini jawaban saya!
BalasHapusvar
d:=real;
a,b,c:=longint;
begin
readln(d);
c:=trunc(d);
a:=c+1;
b:=c-1;
writeln(a,' ',b);
readln;
end.
Komentar ini telah dihapus oleh pengarang.
Hapusvariable kalau ngga salah cuma pake ":" bukan pake ":=" itu hanya buat nyatain nilai gan , koreksi dikit
Hapustrunc itu apa ya?? mohon tanya pemulaa
Hapuswow,, singkat ya... ternyata jawaban anda lebih baik daripada jawban saya.. *SALUT*
BalasHapusvariabel a,b nya kok gk dimasukkan mas?
BalasHapusoh iya,,, itu kelupaan menghapus variabel nya. :D
BalasHapussaya sudah coba namun hasilnya -255 dan -257
BalasHapusini jawaban saya pake bahasa c
BalasHapus#include
#include
int main (){
int n,f,c,b;
scanf("%d", &n);
c=ceil(n)
if(-100000<n<100000){
f=c-1;
b=c;
}
if(c=N){
f=b=c;
}
return 0;
}