em hay nhap mot day so nguyen gom 10 phan tu tinh tong cac so trong day do (su dung mang 1 chieu de giai)
viet chuong trinh nhap 1 day so sau do in ra man hinh cac so chinh phuong
viet chuong trinh nhap vao cac so nguyen tu ban phim va tinh tong cua chung.Chuong trinh dung lai khi tong lon hon hoac bang a(a la so nhap tu ban phim)va thong bao tong do ra man hinh(Free Pascal)
Giup minh voi
Viet chuong trinh nhap vao N so tu ban phim. Tinh tong,tich,hieu cac so vua nhap vao
Viet chuong trinh nhap vao cac so nguyen a,b,c,d,e tinh tong cac so co chu so tan cung la 5 va 0
viet chuong trinh nhap vao so nguyen a va b . In ra man hinh ket qua a co chia het cho b hay khong moi nguoi giup em gap voi
viet chuong trinh nhap vao tu ban phim so nguyen duong N , tinh tong gia tri chia het cho 3 trong pham vi tu 1 den N , sau do in ra man hinh
viet chuong trinh nhap vao mang so nguyen a(toi da 100 phan tu) tu ban phim in len man hinh cac phan tu chia het cho K (khong duoc nhap vao tu ban phim khi chay chuong trinh) trong mang
Đọc và sửa sai các lỗi trong chương trình Pascal sau (1điểm)
Brogram Bai 1;
Uses crt ;
Var x, y = integer
Begin
Write(‘nhap vao gia tri cua x : ‘, ‘x=’) ;
Readln(x);
Write(‘nhap vao gia tri cua y : ‘, ‘y=’) ;
Readln();
Write(‘tong cua hai so x va y la:’, x+y) ;
Readln
end
Đọc và sửa sai các lỗi trong chương trình Pascal sau
Brogram Bai 1;
Uses crt ;
Var x, y = integer
Begin
Write(‘nhap vao gia tri cua x : ‘, ‘x=’) ;
Readln(x);
Write(‘nhap vao gia tri cua y : ‘, ‘y=’) ;
Readln();
Write(‘tong cua hai so x va y la:’, x+y) ;
Readln
end