Tuyển tập đề ôn thi học sinh giỏi môn tin 9 cấp tỉnh, Đề thi học sinh giỏi tin 9, đề thi môn tin 9 cấp tỉnh, ôn thi học sinh giỏi môn tin 9, Tổng hợp đề thi môn tin 9 cấp tỉnh, tài liệu ôn thi môn tin 9 cấp tỉnh, đề thi có đáp án môn tin 9.
ĐỀ THI THỬ SỐ 11 Bài (8 điểm) Số điện thoại di động nhà mạng Viettel bao gồm đầu số sau: - Đối với số có 10 chữ số có đầu số: 096; 097; 098 - Đối với số có 11 chữ số có đầu số: 0162; 0163; 0164; 0165; 0166; 0167; 0168; 0169 Yêu cầu: Nhập vào số điện thoại bất kì, kiểm tra xem số có thuộc số di động nhà mạng Viettel hay khơng? Ví dụ: Nhập số 01631211589 Kết số điện thoại thuộc nhà mạng Viettel với 11 chữ số Bài (5 điểm) Viết chương trình nhập vào dãy số gồm n số nguyên, với n số tự nhiên cho trước Yêu cầu: Tách dãy số thành hai dãy số: dãy số chẵn, dãy số lẻ theo thứ tự tăng dần xuất hình dãy số nhập, dãy số chẵn, dãy số lẻ Ví dụ nhập n= 10; 9 -2 Dãy số nguyên chẵn: -2 Dãy số nguyên lẻ: 9 Bài (7 điểm) Nhập vào dãy số gồm m số nguyên bất kỳ, với m số tự nhiên nhỏ 100 Yêu cầu: Tìm dãy nhập xuất hình số có nhiều ước nhất, với ước số thuộc dãy vừa nhập Ví dụ: Dãy số nhập: 10 12 28 15 20 Số tìm là: 20 HƯỚNG DẪN ĐỀ THI THỬ SỐ 11 Bài program so_viettel; uses crt; var i,s,d:integer; so,so10,so11:string; Begin clrscr; write('nhap so can kiem tra: ');readln(so); s:=length(so); so10:=copy(so,1,3); so11:=copy(so,1,4); for i:=1 to s inc(d); if d=10 then if (so10='096') or (so10='097') or (so10='098') then writeln (so:6,' la so dtdd mang viettel co 10 so'); if d=11 then if (so11='0162') or (so11='0163') or (so11='0164') or (so11='0165') or (so11='0166') or (so11='0167') or (so11='0168') or (so11='0169') then writeln(so:6,' la so dtdd mang viettel co 11 so'); Readln End Bai program tach_mang_chan_le; uses crt; var n,i,j,t:longint; A:array [1 100000]of longint; begin clrscr; write('n='); readln(n); for i:=1 to n begin write('a[',i,']= ');readln(a[i]); for j:=1 to i if a[i]maxu then maxu:=uoc(a[i]);inc(d); end; if d=maxu then writeln('so co uoc lon nhat la: ',a[i]); READLN END ... mang viettel co 10 so'); if d =11 then if (so11='0162') or (so11='0163') or (so11='0164') or (so11='0165') or (so11='0166') or (so11='0167') or (so11='0168') or (so11='0169') then writeln(so:6,'... THI THỬ SỐ 11 Bài program so_viettel; uses crt; var i,s,d:integer; so,so10,so11:string; Begin clrscr; write('nhap so can kiem tra: ');readln(so); s:=length(so); so10:=copy(so,1,3); so11:=copy(so,1,4);... (so11='0167') or (so11='0168') or (so11='0169') then writeln(so:6,' la so dtdd mang viettel co 11 so'); Readln End Bai program tach_mang_chan_le; uses crt; var n,i,j,t:longint; A:array [1 100000]of