K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

17 tháng 10 2021

nhìn mặc áo hình như trò chơi con mực đúng hông đấy là trò giết người hả

Tl :

Khong duoc viet lung tung tren dien dang

~ H T ~

2 tháng 1 2017

bt bạn

15 tháng 1 2017

Rảnh quá ,không giống đâu

17 tháng 3 2023

xau = input("Nhập vào một xâu bất kì: ")

xau_moi = xau.replace("choi", "hoc")

print("Xâu mới sau khi thay thế là:", xau_moi)

17 tháng 3 2023

Program HOC24;

var s: string;

d: byte;

begin

write('Nhap xau : '); readln(s);

while pos('choi',s)<>0 do

begin

d:=pos('choi',s);

delete(s,d,4);

insert('hoc',s,d);

end;

write('Xau sau khi thay la: ',s);

readln

end.

1) Dien vao dau cham trong bai giai: Viet chuong trinh thuc hien nhung viec sau:a) Doc tu ban phim 1 danh sach gom:Ho ten, mon thi thu nhat, diem mon thi thu nhat , mon thi thu hai, diem mon thi thu haib) Ghi vao dia voi ten tep QLHTc) Doc du lieu tu File QLHT, tim nhung hoc sinh phai thi lai ( co it nhat mot mon khong dat ) . Dua ra so thu tu, ho ten, cac mon phai thi lai va diem tuong ung ra man hinh                                                                                          Bai...
Đọc tiếp

1) Dien vao dau cham trong bai giai: Viet chuong trinh thuc hien nhung viec sau:

a) Doc tu ban phim 1 danh sach gom:

Ho ten, mon thi thu nhat, diem mon thi thu nhat , mon thi thu hai, diem mon thi thu hai

b) Ghi vao dia voi ten tep QLHT

c) Doc du lieu tu File QLHT, tim nhung hoc sinh phai thi lai ( co it nhat mot mon khong dat ) . Dua ra so thu tu, ho ten, cac mon phai thi lai va diem tuong ung ra man hinh 

                                                                                         Bai giai

program......

Uses Crt;

 type phieudiem = record

         hten : string [25];

         Mh1 : string [10]; 

             d1 : real;

         Mh2 : string [10];

             d2 : real'

                end;

      Var 

      pd : phieudiem;

        f    file of phieudiem;

        n,i,t : integer;

   Begin

     clrscr;

write ( ' So phieu diem n = ' ) ;

...........................

assign (....................) ;

rewrite (..............)

            For i := 1 to n do 

                                  with pd do 

        begin

             Writeln ( ' Vao phieu diem thu ' , i );

             Write ( ' Ho va ten: ' ) ;

              Readln (...................) 

              Write (' Mon thi thu nhat : ') ;

               Read..............

                Write ( ' Diem mon thu nhat ' );

                Read.....................

                 Write ( ' Mon thi thu hai: ' ) ;

                 Readln.............................

                   Write ( ' Diem mon thu hai: ' ) ;

                     Read...............

                    Write ( f, pd ) ;

                            end;

                       close (f);

                            clrscr ; 

                      Writeln ( ' Danh sach hoc sinh thi lai : ') ;

                         Writeln;

                         assign....................

                         reset...........

                                 t : = 0 ;

                           While not eof (f) do

                         Begin

                           read ( r, pd );

                               with pd do

                                   If ( d1 < 5 ) or ( d2 < 5 ) then 

                                              Begin

                                                 inc (t); 

                                        Write..................

                 if d1 < 5 then 

                              Write.......

              if d2 < 5 then

                            Write............

                      Writeln;

                       end;

                        end;

                         close (f);

                           end.

     

 

 

0
6 tháng 6 2020

Program HOC24;

var s: string[100];

i,o,u: integer;

begin

write('Nhap xau s='); readln(s);

o:=0; u:=0;

for i:=1 to length(s) do

begin

if s[i]='o' then o:=o+1;

if s[i]='u' then u:=u+1;

end;

write('Trong day co ',o,' ki tu "o" ; va ',u,' ki tu "u"');

readln

end.

13 tháng 11 2021

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<"a truoc khi doi la:"<<fixed<<setprecision(2)<<a<<endl;

cout<<"b truoc khi doi la:"<<fixed<<setprecision(2)<<b<<endl;

swap(a,b);

cout<<"a sau khi doi la:"<<fixed<<setprecision(2)<<a<<endl;

cout<<"b sau khi doi la:"<<fixed<<setprecision(2)<<b;

return 0;

}

12 tháng 11 2021

#include <bits/stdc++.h>

using namespace std;

double a,b,cv,dt;

int main()

{

cin>>a>>b;

cv=(a+b)*2;

dt=a*b;

cout<<fixed<<setprecision(2)<<cv<<endl;

cout<<fixed<<setprecision(2)<<dt;

return 0;

}

20 tháng 10 2021

uses crt;

begin

writeln('Xin chao cac ban');

writeln('Moi ban den voi Pascal');

readln;

end.