Home / Tin học / Tin học lớp 11 / Viết chương trình nhập vào họ tên của một người. Sau đó in chuỗi họ tên ra màn hình với các ký tự đầu đổi thành chữ hoa, toàn bộ chuỗi họ và tên đổi thành chữ hoa.
Viết chương trình nhập vào họ tên của một người. Sau đó in chuỗi họ tên ra màn hình với các ký tự đầu đổi thành chữ hoa, toàn bộ chuỗi họ và tên đổi thành chữ hoa.
Check Also
Viết chương trình nhập vào một ma trận vuông cấp n. a. Tính tổng …
Viết chương trình nhập vào họ tên, điểm văn, điểm toán, điểm anh của một học sinh. Sau đó in ra màn hình: học tên, điểm trung bình, xếp loại của học sinh đó [ trên cùng một dòng ]. Cho biết: – điểm trung bình: [ điểm văn + toán + anh ] /3 – xếp loại: giỏi nếu điểm TB ≥ 9,0 khá nếu 7,0 ≤ điểm TB ≤ 9,0 trung bình nếu 5,0 ≤ điểm TB ≤ 7,0 yếu nếu điểm TB ≤ 5,0
giúp em vs huhu
Viết chương trình nhập họ tên đầy đủ trong lớp học[ không quá 50 người]
Trong các ví dụ sau, đâu là thuật toán [Tin học - Lớp 6]
3 trả lời
Cú pháp của các hàm thông dụng trong excel [Tin học - Lớp 7]
1 trả lời
Cú pháp của các hàm thông dụng trong excel [Tin học - Lớp 7]
1 trả lời
Cho biết câu lệnh sau [Tin học - Lớp 8]
2 trả lời
Program bt;Var a,b : String;BeginKhai báo biếnWriteln [‘ Nhap xau ho ten thunhat : ‘];Nhập vào họ tên học sinh thứReadln[a];nhấtWriteln [‘ Nhap xau ho ten thuNhập vào họ tên học sinh thứhai : ‘];haiSo sánh độReadln[b]; dài 2 xâuIf length[a] > length[b] thenXuất kết quảWriteln[‘ Ket qua : ‘,a]ElseWriteln[b];Dừng chương trình xem kết quảReadln;End. Câu 7 :Viết chương trình nhập vào họ và têncủa hai học sinhKiểm tra kí tự đầu tiên của xâu thứ 1 vàkí tự cuối cùng của xâu thứ 2 :- Nếu giống nhau thì xuất ra dòngchữ :Trùng nhau- Nếu không giống nhau thì xuất racâu :Khác nhau Program bt;Varx : Byte;Khai báo biếna, b : String;BeginWriteln [ ‘Nhap xau thu nhat : ‘];Nhập vào họ tên học sinh thứReadln [a];nhấtWriteln [ ‘Nhap xau thu hai : ‘];Nhập vào họ tên học sinh thứReadln [b];haiXác định độ dài xâu 2 để biết vị trí cuốix := length [b];của xâu 2So sánh kí tự thenxâu 1 và kí tự cuối xâuIf a[1] = b[x] đầu2Writeln [‘ Trung nhau’]Xuất kết quảelse Writeln [‘Khac nhau’];Dừng chương trình xem kết quảReadln;End. Câu 8 :Viết chương trình nhập vào họ vàtên của hai học sinhKiểm tra 2 kí tự cuối của 2 xâu :- Nếu giống nhau thì xuất ra dòngchữ :Trùng nhau- Nếu không giống nhau thì xuấtra câu :Khác nhau Program bt;Varx,y : Byte;Khai báo biếna, b : String;BeginWriteln [ ‘Nhap xau thu nhat : ‘];Nhập vào họ tên học sinh thứReadln [a];nhấtWriteln [ ‘Nhap xau thu hai : ‘];Nhập vào họ tên học sinh thứReadln [b];haix := length [a];Xác định độ dài xâu 2 để biết vị trí cuốiy :=của 2 xâu length [b];If sánh 2 kí tự cuốiSo a[x] = b[y] then của 2 xâuWriteln [‘ Trung nhau’]Xuất kết quảelse Writeln [‘Khac nhau’];Dừng chương trình xem kết quảReadln;End.
Bài 3:
program bai3;
var hoten:string;
ST,NS:integer;
begin
write ['ho ten hoc sinh la:']; readln [hoten];
write ['nam sinh cua hoc sinh la:']; readln [NS];
ST:=2020-NS;
writeln [' so tuoi cua hoc sinh la:',ST];
readln;
end.
bài 5:
program bai5;
begin
write ['Gia tri cua bieu thuc A la', [15+5]/4-[12-8]/[3-1]];
readln;
end.
Bài 4
program bai4;
var a:integer;
begin
for a:=1 to 10 do writeln ['A'];
readln;
end.