Các bài tập Pascal
... Write(i,'x',j:2,'=',i*j:2,' ');Writeln; End; Readln END. Program BaiToanGaCho; Var sg,sc: Byte; BEGIN Writeln(&apos ;Bai toan co Ga + Cho = 36 con. Chan ga + Chan Cho = 100 chan'); ... then Writeln('Ket qua So Ga la: ',sg,' So Cho la: ',sc); Readln END. Program BaiToanTramTrauTramCo; Var td,tn,tg: Byte; BEGIN Writeln('Co 100...
Ngày tải lên: 15/06/2013, 01:26