Viết chương trình pascal, cho hiện 5 lần một nguyên dương tùy ý ( số đó được nhập từ bàn phím màn hình chạy), nhấp sai báo lỗi

0 bình luận về “Viết chương trình pascal, cho hiện 5 lần một nguyên dương tùy ý ( số đó được nhập từ bàn phím màn hình chạy), nhấp sai báo lỗi”

1. program nguyenduong;

   uses crt;

   var i,n,S:integer;

   begin

   clrscr;

   write(‘ n = ‘); readln(n);

   S:=5

   for i:=1 to n do if (i < S) or (i = S) then writeln(n) 

   readln;

   end.

   Bình luận