Bài 5: Cho một số nguyên bất kì. Em hãy viết chương trình nhập vào số nguyên và tính tích 2 số (số nguyên đó với số nguyên liền sau). Vd: Nhập số nguyên: 6 Tích là: 42 (vì 6x7=42). ►Xác định bài toán Input: …………………………………………………………………………… Output:………………………………………………………………………….. ►Viết chương trình bằng NNLT Pascal Uses crt; Var ………………………………….; Begin Clrscr; Write(‘Nhap ..….: ’); Readln(…); ……………………………………………………. ……………………………………………………... Readln; End.
2 câu trả lời
* Xác định bài toán :
- Input : số nguyên bất kì
- Output : tích số nguyên đó với số nguyên liền sau
* Viết chương trình :
uses crt;
var n, s : integer;
begin
clrscr;
write('nhap so nguyen :');readln(n);
s := n * (n + 1);
writeln('tich la :', s);
readln;
end.
►Xác định bài toán
Input: một số nguyên bất kì.
Output: tích của số đó và số liền sau.
►Viết chương trình bằng NNLT Pascal
Uses crt;
Var n,tich:integer;
Begin
Clrscr;
Write(‘Nhap so nguyen: ’); Readln(n);
tich:=n*(n+1);
writeln('Tich la: ',tich);
Readln;
End.