Viết trương trình tính bình phương của 1 số .và xuất ra bình phương từ 1 tới 20 bằng chương trình con ai trả lời mik vote 5 sao và tym…

0 bình luận về “Viết trương trình tính bình phương của 1 số .và xuất ra bình phương từ 1 tới 20 bằng chương trình con ai trả lời mik vote 5 sao và tym…”

1. uses crt;
   var i : integer;
   function bp(x : integer) : integer;
   begin bp:=x*x; end;
   begin clrscr;
   write(‘Binh phuong cac so tu 1 den 20 la :’);
   for i:=1 to 20 do writeln(bp(i));
   readln
   end.

   Bình luận

2. uses crt;
   function make(a:longint):longint;
   var i:longint;
   begin
      writeln(‘Binh phuong cac so tu 1 den 20 la:’);
      for i:=1 to 20 do writeln(i*i);
   end;
   begin
   clrscr;
      make(1);
   readln
   end.

   Test:

   

   Bình luận