Bài 1. Viết chương trình: – Nhập vào số nguyên N. – Tính tích N số nguyên đầu tiên và xuất kết quả ra màn hình. 18/08/2021 Bởi Rylee Bài 1. Viết chương trình: – Nhập vào số nguyên N. – Tính tích N số nguyên đầu tiên và xuất kết quả ra màn hình.
program so_n ; uses crt; var n,tich,i : integer; begin clrscr; tich:=1; write(‘n=’);readln(n); for i:=1 to n do tich:=tich*i ; writeln(‘tich ‘,n,’ so nguyen đau tien la ‘,tich); readln end. Bình luận
program so_n ;
uses crt;
var n,tich,i : integer;
begin
clrscr;
tich:=1;
write(‘n=’);readln(n);
for i:=1 to n do tich:=tich*i ;
writeln(‘tich ‘,n,’ so nguyen đau tien la ‘,tich);
readln
end.