viết chuơng trình : nhạp tổng và tỉ số 2 số cho biết 2 số đó
0 bình luận về “viết chuơng trình : nhạp tổng và tỉ số 2 số cho biết 2 số đó”
Program NN; Uses crt; Var a,b,c: longint; Begin Clrscr; Write(‘Nhap tong va ti so: ‘); Readln(a,b,c); Writeln(‘So thu nhat = ‘,a div (b+c)*b); Write(‘So thu hai = ‘,a div (b+c)*c); Readln End.
Program NN;
Uses crt;
Var a,b,c: longint;
Begin
Clrscr;
Write(‘Nhap tong va ti so: ‘); Readln(a,b,c);
Writeln(‘So thu nhat = ‘,a div (b+c)*b);
Write(‘So thu hai = ‘,a div (b+c)*c);
Readln
End.