Tin học pascal

[phanthikhanhhuyenb2@gmail.com]

[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 nhập và số nguyên dương N và tính tổng bình phương các số chia hết cho 5 bé hơn N

 

[Bạc Liêu123]

viết chương trình nhập và số nguyên dương N và tính tổng bình phương các số chia hết cho 5 bé hơn N

Code chính
Writeln('Nhap N);
If N <=0 then writeln('Nhap lại so N > 0')
S:=0;
For i:=1 to N - 1 do
If i mod 5 = 0 then S:=S+i*i;