tin học 8

[Phạm Thị Quỳnh]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

viết chương trình in ra máy tính dòng chữ pascal 10 lần

 

[Nguyễn Thánh Tiền]

var i:integer;
begin
i:=0;
repeat
write ("passcan: ")
until i>9;
end.

 

[Ngô Trọng Nhân]

uses crt;
var i:integer;
begin
clrscr;
for i:=1 to 10 do writeln('pascal');
readln;
end.