viết chương trình cho F=20+21+22+…+n tin học 8

0 bình luận về “viết chương trình cho F=20+21+22+…+n tin học 8”

1. program oken;

   uses crt;

   var F,n,i: qword;

   begin

   clrscr;

   writeln(‘nhap so n: ‘); readln(n);

   f:=0;

   for i:=20 to n do

       f:=f+i;

   writeln(‘F=’,f);

   readln;

   end.

   Bình luận