Trang chủ Tin Học Lớp 8 viết chương trình nhập vào một số và kiểm tra...

viết chương trình nhập vào một số và kiểm tra xem số đó chia hết cho 5 hay cho 7 câu hỏi 1088040 - hoctapsgk.com

Câu hỏi :

viết chương trình nhập vào một số và kiểm tra xem số đó chia hết cho 5 hay cho 7

Lời giải 1 :

Program chiahet;

Uses crt;

Var n: integer;

Begin

 Clrscr;

 Write('Nhap n: '); Readln (n);

 If n mod 5 = 0 then writeln('n chia het cho 5');

 If n mod 7 = 0 then writeln('n chia het cho 7');

 If (n mod 5 = 0) and (n mod 7 = 0) then writeln('n chia het cho ca 5 va 7')

  else (n mod 5 <> 0) and (n mod 7 <> 0) then writeln('n khong chia het cho ca 5 va 7');

 Readln;

End.

Thảo luận

-- tại bình thường tui chạy chương trình thấy phần điều kiện không cần dâu ( ) nên tui không viết
-- do bạn không chịu chơi đồ đấy bạn ạ
-- 😂😂😂
-- tui thấy dấu ( ) ở phần điều kiện không cần thiết, không có thì chương trình vẫn chạy bình thường mà
-- ông chạy thử chương trình ông chưa
-- chưa có thời gian chạy nữa Tại mọi lần chạy thấy bình thường nên giờ ns vậy thôi
-- ờ làm chương trình thì phải kiểm tra cho chắc nha bạn :<
-- uhm

Lời giải 2 :

Program chia_het;

uses crt;

var n: integer;

Begin

clrscr;

Write('nhap so n:');  readln(n);

if n mod 5=0 then write('so nay chia het cho 5')

else writeln('so nay khong chia het cho 5');

if n mod 7=0 then write('so nay chia het cho 7')

else writeln('so nay khong chia het cho 7');

readln

End.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Copyright © 2021 HOCTAP247