YOMEDIA
NONE

Tin hoc 7 bài tập Pascal

nhập 1 số kiểm tra số đó chia hết cho bao nhiêu số trong các số sau 2,3,4,5,6? bài tập Pascal Mn ơi gúp mình với

Theo dõi Vi phạm
ATNETWORK

Trả lời (7)

  • Nguyễn Quang Thắng

    program chia-het;

    uses crt;

    var n: real;

    begin

    clrscr;

    write(`Nhap mot so tu nhien n bat ki=');readln(n);

    If n mod 2=0 then(`So nay chia het cho 2');

    If n mod 3=0 then(`So nay chai het cho 3');

    If n mod 4=0 then(`So nay chai het cho 4');

    If n mod 5=0 then(`So nay chai het cho 5');

    If n mod 6=0 then(`So nay chai het cho 6');

    writeln;

    end.

      bởi Nguyễn Quang Thắng 14/02/2019
    Like (2) Báo cáo sai phạm
    • YOMEDIA

    Video HD đặt và trả lời câu hỏi - Tích lũy điểm thưởng

  • Phan Công Trực

    bất kì

      bởi Phan Công Trực 26/02/2019
    Like (0) Báo cáo sai phạm
  • _ᵛᶰシӀỡ︵²⁰⁰⁵ժմվêղ ⁀ᶦᵈᵒᶫ_

    ues crt;

    var n,i:integer;

    begin

    write('nhap n: '); readln(n);

    for i:=1 to n do

    if n mod i=0 do writeln('so nay chia het cho',n);

    readln;

    end.

      bởi _ᵛᶰシӀỡ︵²⁰⁰⁵ժմվêղ ⁀ᶦᵈᵒᶫ_ 07/03/2019
    Like (0) Báo cáo sai phạm
  • $ ᴾᴿᴼシnġüÿễn︵²⁰⁰⁵düÿ=ε/̵͇̿̿/'̿'̿ ̿ ̿̿ ̿̿ ̿̿$

    Bạn lỡ duyên minh làm đúng nề

      bởi $ ᴾᴿᴼシnġüÿễn︵²⁰⁰⁵düÿ=ε/̵͇̿̿/'̿'̿ ̿ ̿̿ ̿̿ ̿̿$ 10/03/2019
    Like (0) Báo cáo sai phạm
  • thiên người

    mik ko biet lam

      bởi thiên người 02/04/2019
    Like (1) Báo cáo sai phạm
  • . Tps .

    ??????????????????????????????????

      bởi . Tps . 04/08/2019
    Like (0) Báo cáo sai phạm
  • Nguyên Thảo
    720
      bởi Nguyên Thảo 19/10/2019
    Like (0) Báo cáo sai phạm
Cách tích điểm HP

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

XEM NHANH CHƯƠNG TRÌNH LỚP 7

 

YOMEDIA
ATNETWORK
ON