Giúp em với ạ em đang cần gấp
Một số khái niệm về lập trình và ngôn ngữ lập trình
Giúp em câu 2 3 4 với ạ
Nhập vào 3 số nguyên dương, kiểm tra xem chúng có thỏa mãn điều kiện là ba cạnh của tam giác hay không rồi tính diện tích tam giác
https://oj.vnoi.info/problem/fct018_grcolor2
giúp mình với
Chọn đáp án đúng 1, thông tin nào không phải là hằng số học : a, -2,23E01 b, 54 . c, -23.25 d, 45
2, biểu thức nhận giá trị là True hoặc False là :
a, toán học thực và logic. b, logic và quan hệ c, toán học và lôgic . d, quan hệ và toán học
3, Biến t có thể nhận các giá trị là 1;100;12.55;-46.1 có thể khai báo biến t có kiểu là : a, integer và real....
Đọc tiếp
Chọn đáp án đúng 1, thông tin nào không phải là hằng số học : a, -2,23E01 b, 54 . c, -23.25 d, 45'
2, biểu thức nhận giá trị là True hoặc False là :
a, toán học thực và logic. b, logic và quan hệ c, toán học và lôgic . d, quan hệ và toán học
3, Biến t có thể nhận các giá trị là 1;100;12.55;-46.1 có thể khai báo biến t có kiểu là : a, integer và real. b, byte và integer . c, real và byte d, real
4, Phần mở rộng của Pascal là : a, ( .txt ) b, ( .dos ) c, (.gas ) d, ( .xls )
5, thủ tục để nhập dữ liệu vào biến là :
a, write và readln b, real và writeln. c, write và writeln d, real và readln
6, xét biểu thức ( n mod 2<>0) and ( m div 2 >= 5 ) với giá trị nào của m dưới đây để biểu thức trên cho giá trị là True : a, 5 B, 500 c, 455. D, 6
7, Biến n chỉ nhận một trong hai giá trị là '1' và '0' hãy cho biết khai báo nào sau đây là đúng : a, Var N : Clar b, Var N : Byte c, Var N : Boolean d, Var N : Real
8, hàm số căn bậc hai của P là : a, Abs (P) b, Sqr ( P ) c, Sqr ( P ) d, Sqrt ( P )
9, biểu thức ( 2*2 <1+1 ) or ( Abs (-3) <= 3 ) trong Pascal sẽ nhận giá trị là : a, đúng . b, sai c, True d, False.
10, hãy chọn ra kiểu dữ liệu có kích thước bộ nhớ lớn nhất trong các kiểu sau : a, integer b, byte . C, longint d, real
Phần tự luận :
1, hãy phân biệt kiểu giống và khác nhau của tên dành riêng và tên chuẩn
2, cho hình thoi ABCD có độ dài hai đường chéo AC và BD lần lượt là d1 và d2 dữ liệu được nhập từ bàn phím . Em hãy viết chương trình tính diện tích hình thoi ABCD
3, Em hãy viết biểu thức logic để ba số a,b, c tạo thành : - ba cạnh của tam giác. - ba cạnh của tam giác cân. - ba cạnh của tam giác đều . - ba cạnh của tam giác vuông
4, A, Tìm lỗi sai trong đoạn Pascal sau : Var so1,so2,hieu:=integer; Begin writeln ( ' chung trinh thuc hien phep tru so hoc ' ) So1:=400 So2:=250 ; Hieu:= so1-so2; Writeln('ketqua=',hieu:5); Readln; End b, cho biết kết quả xuất ra màn hình của chương trình trên sau khi đã sửa lỗi sai
5, viết chương trình tính trung bình cộng của 4 số bất kì dữ liệu nhập từ bàn phím với điều kiện sử dụng 4 biến .
tự luận bài 5
uses crt;
var a,b,c,d:integer;
tbc:real;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
write('d='); readln(d);
tbc:=(a+b+c+d)/4;
writeln('trung binh cong cua 4 so la: ',tbc:4:2);
readln;
end.
Đúng 1
Bình luận (0)
Lập trình Scratch theo đề sau:
Nhân vật: thầy giáo và học sinh.
Thầy sẽ đưa ra 1 số nguyên dương N được nhập từ bàn phím.
Học sinh trả lời:
Nếu N là số chẵn thì thông báo là số chẵn.
Nếu N là số lẻ thì thông báo là số lẻ.
Quá trình nhập dữ liệu chỉ kết thúc khi nhập được 1 số vừa chia hết cho 2, cho 3.
Đọc tiếp
Lập trình Scratch theo đề sau:
Nhân vật: thầy giáo và học sinh.
Thầy sẽ đưa ra 1 số nguyên dương N được nhập từ bàn phím.
Học sinh trả lời:
Nếu N là số chẵn thì thông báo là số chẵn.
Nếu N là số lẻ thì thông báo là số lẻ.
Quá trình nhập dữ liệu chỉ kết thúc khi nhập được 1 số vừa chia hết cho 2, cho 3.
Giả sử 1 byte biểu diển 1 ký tự. 10 byte tương đương với một trang giấy 40 dòng mỗi dòng 18 ký tự hỏi một quyển sách 500 trang chiếm bao nhiêu dung lượng trên máy tính
nhập 1 số n in ra các số từ 1 đến n kết thúc có dấu ! giữa các số được in ra và kí tự có 1 khoảng trống
var
n,i:integer;
begin
write(' nhap n : '); readln(n);
for i:= 1 to n do
begin
write( i ,' ! ');
end;
readln
end.
end;
Đúng 0
Bình luận (0)
var
i,n:integer;
begin
write('nhap n : ');
readln(n);
for i:= 1 to n do
write(i,' ! ');
readln
end.
{ cau tren sai roi nha ban }
Đúng 0
Bình luận (0)
nhập vào 1 dãy số nguyên gặp số 0 thì dừng lại. in ra tổng các số vừa nhập
var a: array[1..10000] of longint; s: longint;
begin
repeat
readln(a[i]);
s:=s+a[i];
until a[i]=0;
write(s);
readln
end.
Đúng 0
Bình luận (1)
var
i,d,n:integer;
s:longint;
a:array [1..32000] of integer;
begin
write(' nhap n: '); readln(n);
for i:= 1 to n do
begin
write('a[',i,']= '); readln(a[i]);
inc(d);
if a[i] = 0 then break;
end;
for i:= 1 to d do
s:= s + a[i];
write(' tong so vua nhap la : ',s);
readln;
end.
Đúng 0
Bình luận (0)
viết chương trình tệp tên là DIENTICH.TXT để đọc các số nguyên lần lượt là bán kính của các hình tròn (các số cách nhau bởi dấu cách, số lượng các số nguyên chưa biết trước). Tính diện tích các hình tròn tương ứng với các bán kính rồi ghi kết quả vào tệp KQ.TXT. Mỗi giá trị diện tích được ghi trên một dòng
mọi người giải giúp vs ạ