Câu 1: (3đ) Viết Chương Trình Pascal Tìm ước Số Chung Lớn Nhất ...

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

• • Đăng nhập
  • |
  • Đăng ký
  

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

+

Lưu vào

• +

  Danh mục mới

Lưu

• tonguoclinh
• Chưa có nhóm

• Trả lời

  0

• Điểm

  46

• Cảm ơn

  0

• Tin Học
• Lớp 10
• 30 điểm
• tonguoclinh - 09:30:46 09/12/2021

Câu 1: (3đ) Viết chương trình Pascal tìm ước số chung lớn nhất (USCLN) của hai số nguyên dương a,b. Câu 2: (3đ) Viết chương trình pascal tính tổng S=1+2/2!+…+n/n!; (n gnuyên dương) Câu 3: (4đ) Viết chương trình đếm các loại ký tự từ xâu nhập từ bàn phím; in kết qua ra màn hình. Ví dụ nhập ABCABD thì kết quả hiện ra màn hình Cần ngay giờ ạ

• Hỏi chi tiết
• Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

• hoaithuong28112007
• Chưa có nhóm

• Trả lời

  31

• Điểm

  1473

• Cảm ơn

  14

• hoaithuong28112007

• Câu trả lời hay nhất!
• 09/12/2021

1. uses crt;

var a,b,ucln,bcnn,i:integer;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

ucln:=1;

if a<b then begin

2.

uses crt;

var n,i,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

i:=1;

while i<=n do

3.uses crt;var xau: string;n,i:integer;beginclrscr;n:= 0;write('Nhap xau: ');readln(xau);

do chị học lâu rồi nên có thể sai xót em thông cảm nha,chúc e học tốt!!!

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy

• Cảm ơn 1
• Báo vi phạm

• 
  • hoaithuong28112007
  • Chưa có nhóm
  • Trả lời

    31

  • Điểm

    1473

  • Cảm ơn

    14

  cảm ơn em

Đăng nhập để hỏi chi tiết

• huyendiucute2k9
• Chưa có nhóm

• Trả lời

  16

• Điểm

  1066

• Cảm ơn

  9

• huyendiucute2k9

• 09/12/2021

uses crt;

var a,b,ucln,bcnn,i:integer;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

ucln:=1;

if a<b then begin

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstar5starstarstarstarstar1 voteGửiHủy

• Cảm ơn
• Báo vi phạm

• 
  • hoaithuong28112007
  • Chưa có nhóm
  • Trả lời

    31

  • Điểm

    1473

  • Cảm ơn

    14

  giống mình nà

Đăng nhập để hỏi chi tiếtXEM LỜI GIẢI SGK TIN 10 - TẠI ĐÂY

Bạn muốn hỏi điều gì?

Đặt câu hỏi

PH/HS Tham Gia Nhóm Lớp 10 Để Trao Đổi Tài Liệu, Học Tập Miễn Phí!

Bảng tin

Bạn muốn hỏi điều gì?

Đặt câu hỏi

Lý do báo cáo vi phạm?

Gửi yêu cầu Hủy

Cơ quan chủ quản: Công ty Cổ phần Công nghệ Giáo dục Thành Phát

• 
• 
• 

Tải ứng dụng

• Hướng dẫn sử dụng
• Điều khoản sử dụng
• Nội quy hoidap247
• Góp ý
• Tin tức

• Inbox: m.me/hoidap247online
• Trụ sở: Tầng 7, Tòa Intracom, số 82 Dịch Vọng Hậu, Cầu Giấy, Hà Nội.

Giấy phép thiết lập mạng xã hội trên mạng số 331/GP-BTTTT do Bộ Thông tin và Truyền thông.