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.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
TT
1
18 tháng 3 2023
a: uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 70 do s:=s+i;
write(s);
readln;
end.
b:
uses crt;
var s,i:integer;
begin
clrscr;
s:=1;
for i:=1 to 80 do
if i mod 2=0 then s:=s+i;
write(s);
readln;
end.
GIÚPGIÚP MIK NA
17 tháng 11 2017
Program bai1;
uses crt;
var a: array[1..100] of integer;
n,i: integer;
begin
clrscr;
write('nhap n ='); readln(n);
for i:= 1 to n do
begin
write('nhap a[',i,'] ='); readln(a[i]);
end;
writeln('cac so chan la :');
for i:= 1 to n do
if a[i] mod 2 = 0 then write(a[i] :4);
writeln;
writeln('cac so le la :');
for i:= 1 to n do
if a[i] mod 2 <> 0 then write(a[i] :4);
writeln;
writeln('cac so chia het cho 3 la :');
for i:= 1 to n do
if a[i] mod 3 = 0 then write(a[i] :4 );
readln;
end.
QT
Quoc Tran Anh Le
Giáo viên
2 tháng 9 2023
| Bước | Thao tác | Kết quả |
| 1 | Chuyển số 4 sang dạng nhị phân | 100 |
| 2 | Chuyển số 8 sang dạng nhị phân | 1000 |
| 3 | Chuyển số 32 sang dạng nhị phân | 100000 |
| 4 | Cộng ba số cùng cột ở trên trong hệ nhị phân | 101100 |
Áo team .
Áo team 
ML
29 tháng 10 2020
Lần sau bạn nhớ nêu rõ yêu cầu đề bài là viết chương trình hay viết thuật toán nhé. Bạn chọn là Tin học 10 vì đa số lớp 10 học viết thuật toán nên mình sẽ viết thuật toán.
- Thuật toán liệt kê:
+ Bước 1: Nhập n; dãy a1,a2,a3,...,an
+ Bước 2: i←1; d←0;
+ Bước 3: Nếu i>n thì in ra d và kết thúc thuật toán
+ Bước 4: Nếu ai = 5 thì d←d+1;
+ Bước 5: i←i+1; quay lại bước 3
- Thuật toán sơ đồ khối:
2:
a: \(22_{10}=10110_2\)
b: \(64D_{16}=1613_{10}\)