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.