K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

25 tháng 4 2023

program TinhTong;
var  n, s,i: integer;
begin
  write('Nhap vao n: ');
  readln(n);

  s := 0;
  for i := 5 to n step 5 do
  begin
    s := s + i;
  end; writeln('Tong cua day so la: ',s);
  readln;
end.

25 tháng 4 2023

nói chuyện thấy ko có văn minh nhan bạn