uses crt;
var i:longint;
begin
clrscr;
for i:=1 to 10 do
writeln('tien hoc le hau hoc van');
readln
end.
uses crt;
var i:byte;
begin
for i:=1 to 10 do
writeln('tien hoc le hau hoc van');
readln
end.
uses crt;
var i:longint;
begin
clrscr;
for i:=1 to 10 do
writeln('tien hoc le hau hoc van');
readln
end.
uses crt;
var i:byte;
begin
for i:=1 to 10 do
writeln('tien hoc le hau hoc van');
readln
end.
Viết chương trình nhập từ bàn phím "toi di hoc" sau khi chạy chương trình hiện xâu kí tự "hoc di toi"
Câu 1: Sử dụng vòng lặp for ... do, viết chương trình tính tổng của 10 số tự nhiên đầu tiên ?Câu 2: Viết chương trình tìm xem có bao nhiêu số dương trong N số nhập vào từ bàn phímCâu 3: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan sát
Viết chương trình in ra màn hình các số từ 1 => n . Sử dụng câu lệnh while..do
Viết chương trình đưa ra thông báo trên màn hình. Mỗi thông báo nằm trên một dòng lệnh.
Rat vui khi duoc lam quen voi cac ban
Day la bai kiem tra hoc ki 1 mon Tin hoc lop 8
Chuong trinh Turbo Pascal rat la hay
Viết chương trình nhập vào số nguyên từ 1 đến 10 in ra số lượng dấu sao (*) tương ứng với số n vừa nhập.
viết chương trình tìm và in ra 1 số có 5 chữ số biết rằng nếu viết ngược số đó lại thì số mới nhận dc sẽ gấp 4 lần số cần tìm
1. Viết chương trình nhập vào một số nguyên dương n và in ra màn hình dãy số tự nhiên từ 1 tới n. 2. Viết chương trình nhập vào một số nguyên n và in ra màn hình các số nguyên chẵn trong khoảng từ 1 tới n.
Giả sử cần viết chương trình nhập một số tự nhiên a vàotừ bàn phím và in ra màn hình kết quả số a là số chẵn hay số lẻ. VD: Nhập a=5 thì in ra "a là số lẻ" ngược lại a =10 thì in ra a" là số chẵn". Hãy mô tả các bước của thuật toán để giải quyết bài toán trên và viết chương trình Pascal để thực hiện thuật toán đó.
Hãy mô tả thuật toán của bài toán ''Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, số được nhập từ bàn phím''.