Câu Lệnh Nào Thực Hiện đưa Ra Xâu S Theo Thứ Tự đảo Ngược (ví Dụ

Có thể bạn quan tâm

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

logo

Lưu vào

+
Danh mục mới

Lưu

nongduc832005
Chưa có nhóm

Trả lời
0
Điểm
3555
Cảm ơn
0

Tin Học
Lớp 11
40 điểm
nongduc832005 - 18:21:45 15/03/2022

Giúp mình 3 câu tự luận với ạ ( mình cảm ơn)

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

keyy
Annihilators

Trả lời
1742
Điểm
28430
Cảm ơn
1313

keyy

23/03/2022

Câu 1:- Lỗi: Chưa khai báo biến i Chưa xuất giá trị của phép nhân- Sửa:Var i, k: byte;Begin For i := 1 to 20 do Writeln(5, ' * ', i, ' = ', 5 * i);End.Câu 2:a) Function inhoa(string a): string;Begin a := 'caobang'; inhoa := upcase(a);End;b) Function cat(string a): string;Begin a := 'Ha Noi Viet Nam'; cat := copy(a, 8, 8);End;c) Function ghep(string a, b): string;Begin a := 'cao'; b := 'bang'; ghep := a + b;End;Câu 3:Program BT;Uses crt;Var B: array[1..100005] of longint; N, i, dc, dl, da, dd: longint;Begin Clrscr; Write('Nhap n: '); Readln(n); dc := 0; dl := 0; da := 0; dd := 0; For i := 1 to n do Begin Write('B[',i,'] = '); Readln(B[i]); If B[i] mod 2 = 0 then inc(dc) Else inc(dl); If B[i] > 0 then inc(dd); If B[i] < 0 then inc(da); End; Writeln('So luong so chan, le, duong, am lan luot la: '); Writeln(dc); Writeln(dl); Writeln(dd); Write(da); ReadlnEnd.

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

- khoadang09
- Chưa có nhóm
- Trả lời
  5559
- Điểm
  4796
- Cảm ơn
  3447
Mong anh keyy cho ý kiến bài em ạ

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

Xem thêm:

>> Bài mẫu thư UPU lần thứ 54 năm 2025
>> Mời tham gia sự kiện "Nhìn lại năm cũ 2024"

khoadang09
Chưa có nhóm

Trả lời
5559
Điểm
4796
Cảm ơn
3447

khoadang09

24/03/2022

`1)`

`-` Chưa khai báo biến i

`-` Kết quả bảng cửu chương chưa in ra

`=>` Sửa

Var i, k : byte ;

Begin

For i:= 1 to 20 do

write(5,'*',i,'=',5*i);

End .

`2)`

`a)`

Procedure In_Hoa ;

Var a,a_ : String

Begin

a := 'caobang';

a_ := upcase(a)

End;

`b)`

Procedure Cat_xau ;

Var a,b : string[18] ;

Begin

a := 'Ha Noi Viet Nam' ;

b := Copy( a, 8, 8);

End ;

`c)`

Procedure Noi_Xau ;

Var a, b, c : string [18] ;

Begin

a := 'cao ';

b := 'bang';

C := Concat(a,b)

End ;

`3)`

uses crt; var dc,dl,da,dd : byte; n,i : longint ; b : array[1..100]of longint ; begin clrscr; write('nhap so luong phan tu: '); readln(n); write('nhap cac phan tu: '); for i:=1 to n do begin read(b[i]); if b[i]>0 then dd := dd + 1 ; if b[i] <0 then da := da + 1 ; if b[i] mod 2=0 then dc := dc + 1 ; if b[i] mod 2=1 then dl := dl + 1; end ; writeln('Co',dd,' so duong, co ',da,' so am, co ',dl,' so le, co ',dc,' so chan trong day .'); end.

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

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy

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

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

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

Đặt câu hỏi

Tham Gia Group Dành Cho 2K8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Câu 19: Câu lệnh nào thực hiện đưa ra xâu S theo thứ tự đảo ngược (ví dụ: xâu dcba là xâu đảo ngược của xâu abcd) A. For i= 1 to length(S) do write(S[i]); C. For i:= length(S) downto 1 do write(S); Câu 20: Cho khai báo mảng: Var a: array[0..50] of real; và đoạn chương trình như sau: ma ...

Xem thêm

Bảng tin