viết chương trình pascal nhập vào dãy n số nguyên và in dãy đã nhập ra màn hình. tính tổng các số chẵn của dãy số trên
Bằng cách nhấp vào Đăng nhập, bạn đồng ý Chính sách bảo mật và Điều khoản sử dụng của chúng tôi. Nếu đây không phải máy tính của bạn, để đảm bảo an toàn, hãy sử dụng Cửa sổ riêng tư (Tab ẩn danh) để đăng nhập (New Private Window / New Incognito Window).
Theo phần mềm Free Pascal IDE thì sẽ viết như sau:
program sochan;
uses crt;
var a:array[1..50] of integer;
n,tongchan:integer;
begin
clrscr;
tongchan:=0;
writeln('Hay nhap so phan tu A');readln(n);
for i:=1 to n do
begin if a[i] mod 2=0 then tongchan:=tongchan+a[i];
writeln(a[i]){in ra số chẵn như đề bài đã nói}
end;
writeln('Tong cac so chan la ',tongchan);
readln;
end.
Tham gia Cộng đồng Lazi trên các mạng xã hội | |
Fanpage: | https://www.fb.com/lazi.vn |
Group: | https://www.fb.com/groups/lazi.vn |
Kênh FB: | https://m.me/j/AbY8WMG2VhCvgIcB |
LaziGo: | https://go.lazi.vn/join/lazigo |
Discord: | https://discord.gg/4vkBe6wJuU |
Youtube: | https://www.youtube.com/@lazi-vn |
Tiktok: | https://www.tiktok.com/@lazi.vn |
Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi
Vui | Buồn | Bình thường |