Viết chương trình tính tổng S=1+2+-+N INPUT:3 OUTPUT:6

0 bình luận về “Viết chương trình tính tổng S=1+2+-+N INPUT:3 OUTPUT:6”

1. uses crt;

     var N, S, i: integer;

   begin

     write(‘Nhap N = ‘); readln(N);

     s:=0;

     for i:=1 to N do S:=S+i;

     writeln(‘Tong cua S = ‘, S);

     readln

   end.

   Bình luận