program az;
uses Crt;
var n : integer;
begin
clrscr;
Write('Nhap n = '); readln(n);
If (n mod 2 = 0) then Writeln(n,'chia het cho 2') else Writeln(n,'khong chia het cho 2');
If (n mod 5 = 0) then Writeln(n,'chia het cho 5') else Writeln(n,'khong chia het cho 5');
readln
end.
uses crt;var a:string; i,j:longint; t:char;beginclrscr; write('s=');readln(a); for i:=1 to length(a) do for j:=1 to i-1 do if a[i]<a[j] then begin t:=A[I]; a[i]:=a[j]; a[j]:=t; end; writeln(a);readlnend.
Giúp mình với ạ mình đang cần gấp huhu
Chuyện gia hoá giúp em hai ví dụ vs
so sánh truyện ngụ ngôn với truyện cười ,tóm tắt tóm tắt nội dung ý nghĩa của truyện ngụ ngôn và truyện cười ai làm đúng mình cho hay nhất
mọi ng ơi chỉ e mấy phép tính này vs ạ . Cảm ơn mọi ng rất rất là nhiều ❤️❤️, đặt tính và tính nha
Phát biểu cảm nghĩ về thầy cô mà em yêu quý
Giúp e vs ạ...Mai e nộp r mà e vẫn chưa giải đc
vẽ anime về tâm trạng ngày hnay của bn ik ;-;
Nêu những tình huống cần được hô hấp nhân tạo.
Giải giúp mình những câu này với ạ
chao anh chi We are going to .... a party this Saturday. Do you want to come with us? Đáp án naò đúng ạ A. do B. go C. have D. get em xin cam on! Em chon đáp án C không biết đung không
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
