Tin học Viết chương trình

Thảo luận trong 'Tin học cấp III' bắt đầu bởi Dollee's Pii's, 30 Tháng mười 2018.

Lượt xem: 102

  1. Dollee's Pii's

    Dollee's Pii's Học sinh tiến bộ Thành viên

    Bài viết:
    186
    Điểm thành tích:
    151
    Sở hữu bí kíp ĐỖ ĐẠI HỌC ít nhất 24đ - Đặt chỗ ngay!

    Đọc sách & cùng chia sẻ cảm nhận về sách số 2


    Chào bạn mới. Bạn hãy đăng nhập và hỗ trợ thành viên môn học bạn học tốt. Cộng đồng sẽ hỗ trợ bạn CHÂN THÀNH khi bạn cần trợ giúp. Đừng chỉ nghĩ cho riêng mình. Hãy cho đi để cuộc sống này ý nghĩa hơn bạn nhé. Yêu thương!

    1 . Viết chương trình tìm số có ba chữ số abc thỏa abc = a^3 +b^4+c^3. với a,b,c được nhập từ bàn phím
    2. viết chương trình nhập vài một số nguyên dương bé hơn 362880. Kiểm tra số đó có phải số nguyên tố không?
    3. Viết chương trình nhập vào 3 số a,b,c đưa ra màn hình số Max.
     
    Trương Văn Trường Vũ thích bài này.
  2. Trương Văn Trường Vũ

    Trương Văn Trường Vũ TMod Vật Lí Cu li diễn đàn

    Bài viết:
    416
    Điểm thành tích:
    91
    Nơi ở:
    Quảng Trị
    Trường học/Cơ quan:
    THCS Nguyễn Huệ

    1) var a,b,c:integer;
    begin
    write('nhap a,b,c '); readln(a,b,c);
    S:=a*a*a+b*b*b*b+c*c*c;
    write('so abc la ', S);
    readln;
    readln;
    end.
    chú thích: đó là tìm số bằng a^3+b^4+c^3 còn tìm abc thì a,b,c k nhập từ bàn phím (theo cách khác a hay chị gì đó ạ)
    2) var n,k,i,d:integer;
    begin
    repeat
    write('nhap so '); readln(n);
    until n<362880;
    k:=trunc(sqrt(n));
    d:=0;
    for i:=1 to k do
    if n mod i = 0 then d:=d+1;
    if d=0 then write('so do la so nguyen to')
    else write('so do khong phai la so nguyen to');
    readln;
    readln;
    end.
    3)var a,b,c,max:integer;
    begin
    write('nhap 3 so a,b,c: '); readln(a,b,c);
    max:=a;
    if b>max then max:=b;
    if c>max then max:=c;
    write('so lon nhat trong 3 so la ',max);
    readln;
    readln;
    end.
     
Chú ý: Trả lời bài viết tuân thủ NỘI QUY. Xin cảm ơn!

Draft saved Draft deleted

CHIA SẺ TRANG NÀY

-->