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.

uses crt;
var a:array[1..5]of integer;
n,i,b,c,d,dem:integer;
begin
clrscr;
randomize;
n:=5;
for i:=1 to n do
begin
write('lan nhap thu ',i,'='); readln(a[i]);
end;
b:=random(900)+100;
c:=random(900)+100;
d:=random(900)+100;
dem:=0;
for i:=1 to n do
begin
if b=a[i] then inc(dem);
if c=a[i] then inc(dem);
if d=a[i] then inc(dem);
end;
if dem>=3 then writeln('ban da thang!')
else writeln('ban da thua!');
readln;
end.

24 tháng 3 2020

Đề có cho biết các số máy lấy như thế nào đâu bạn nhỉ?

10 tháng 12 2016

câu(1) và (2) đã trả lời rồi còn câu (3) mk trả lời nốt.

-Cách sao chép dữ liệu:

+)Cách 1: Sao chép bằng cặp lệnh Copy-Paste:

B1: Chọn ô tính hoặc các ô tính nguồn( là các ô tính có dữ liệu hoặc công thức cần sao chép)

B2: Nháy chọn nút lệnh Copy

B3: Chọn ô tính đích( là ô đầu tiên trong khối nhận dữ liệu sao chép)

B4: Nháy chọn nút Paste

B5: Nhấn phím ESC để kết thúc việc sao chép. Quay về B3 để tiếp tục sao chép.

+) Cách 2: Sao chép bằng thao tác kéo thả chuột: dùng chuột kéo thả mốc của ô hoặc khối cần sao chép theo hướng xuống dưới hay lên trên( nếu sao chép giữa các hàng) hoặc theo hướng sang phải hay sang trái( nếu sao chép giữa các cột).

- Cách di chuyển dữ liệu: Ta làm tương tự như sao chép dữ liệu. B1 thay vì chọn nút Copy thì ta sẽ chọn nút Cut

 

9 tháng 12 2016

1)

*Ô là vùng giao nhau giữa cột và hàng

*Hàng và cột là miền làm việc chính của bảng tính

*Khối là 1 nhóm các ô liên kề nhau tạo thành hình chữ nhật

2)

*Hàm là công thức được định nghĩa từ trước

*Lợi ích:

Giúp việc tính toán trở nên dễ dàng và nhanh chóng hơn

*Các bước nhập công thức:

b1: Chọn ô cần nhập công thức

b2: Gõ dấu =

b3: Nhập công thức

b4: Nhấn Enter hoặc nháy chuột vào dấu "V" để kết thúc

*Các bước nhập hàm:

b1: Chọn ô cần nhập

b2: Gõ dấu=

b3: Gõ hàm theo đúng cú pháp của nó

b4: Nhấn Enter

(câu 3 mình không hiểu rõ cho lắm leu )

uses crt;
var n,i,kt,j:longint;
begin
clrscr;
repeat
write('n='); readln(n);
if n<=2 then writeln('vui long nhap lai');
until n>2;
writeln('cac so nguyen to nho hon so ',n,' la: ');
for i:=2 to n do
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then write(i:4);
end;
readln;
end.

24 tháng 3 2020

program cachkhac;

var i,N: integer;

function KT(a: integer): boolean;

var j: integer;

begin

nt:=false;

if j<=1 then exit;

for j:=2 to trunc(sqrt(a)) do if a mod j=0 then exit;

nt:=true;

end;

Begin

Write('Nhap so nguyen N=');

Readln(N);

For i:=1 to n do

If nt(i) then write(i,' ');

Readln

end.

19 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n%2==0) cout<<"Chan";

else cout<<"Le";

return 0;

}

uses crt;

var n,d,i,t,x,y:integer;

st:string;

begin

clrscr;

write('Nhap n='); readln(n);

if n mod 2=0 then writeln('1')

else writeln('0');

str(n,st);

d:=length(st);

writeln('Cac chu so cua ',n,' la: ');

for i:=1 to d do

write(st[i]:4);

writeln;

t:=0;

for i:=1 to d do

begin

val(st[i],x,y);

t:=t+x;

end;

writeln('Tong cac chu so cua ',n,' la: ',t);

readln;

end.

17 tháng 7 2020

ok bạn

28 tháng 1 2022

 mình được làm đó bn

 

28 tháng 1 2022

haizz cập nhật nhìu thông tin xã hội hơn đi ông

25 tháng 2 2021

1. Vd nhập điểm toán ở ô A1, văn ô B1, anh ô C1 thì D1 tính điểm trung bình dùng =average(A1,B1,C1)

mình không học tin 7 nữa nên cất sách đâu đó rồi lười lục nên bạn làm tương tự vậy nhé :)

2. bảng tính in ra mấy trang tùy vào danh sách lớp đó nhiều không mở in ra nhìn được là thấy in ra mấy trang nhé! Print -> print preview

3. riêng phần này bạn tự căn ở trang tính cho phù hợp nhé :)

25 tháng 2 2021
=AVRAGE(C4+C7)