Câu 1: Viết cú pháp câu lệnh lặp với số lần chưa biết trước.Nêu hoạt động của câu lệnh . Câu 2: Viết phương trình pascal tính chu vi và diện tích của hình chữ nhật với hai cạnh đc nhập vào từ bàn phím Câu 3: Viết phương trình pascal tính tổng các số tự nhiên từ 1 đến 30 Câu 4: Ch

kimphung2542

2 năm trước

Câu 1: Viết cú pháp câu lệnh lặp với số lần chưa biết trước.Nêu hoạt động của câu lệnh . Câu 2: Viết phương trình pascal tính chu vi và diện tích của hình chữ nhật với hai cạnh đc nhập vào từ bàn phím Câu 3: Viết phương trình pascal tính tổng các số tự nhiên từ 1 đến 30 Câu 4: Cho bài toán: tìm số tự nhiên n<100 để n^2 +2018 là 1 số chính phương. Em hãy viết phương trình giải bài toán trên.

Loga Sinh Học lớp 12

0 lượt thích 22 xem

1 trả lời

Thích Trả lời

lehaduong2004

Câu 1:for <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

Câu 2:program Hinh_Chu_Nhat;
uses crt;
var r,d: integer; CV,DT:longint;
begin
clrscr;
repeat
write('Nhap chieu dai: ');
readln(d);
write('Nhap chieu rong: ');
readln(r);
until (d<100) and (d>0) and (b>0) and (b<100);
DT:=r*d;
CV:=(r+d)*2;
writeln('Chu vi hcn la: ',CV);
write('Dien tich hcn la: ',DT);
readln
end.
Câu 3:
program Bai_1_FoToDo;
uses crt;
var n,i :longint; S :qword;
begin
clrscr;
write('Nhap n: ');readln(n);
S:=0;
Bai 4:For i:=1 to 30 do S:=S+i
write('Tong cac so tu 1->30 la : ',S);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

nguyenthiquynhchi445

Câu 1 :

- Cú pháp lệnh lặp với số lần chưa biết trước : while <điều kiện> do <câu lệnh>;

- Hoạt động :

+ Điều kiện sẽ được tính và kiểm tra

+ Nếu điều kiện đúng thì câu lệnh sẽ được thực hiện

+ Nếu điều kiện sai thì vòng lặp sẽ dừng lại

Câu 2 :

uses crt;

var a, b : integer;

begin

clrscr;

write('nhap chieu dai : '); readln(a);

write('nhap chieu rong : '); readln(b);

writeln('chu vi = ', (a + b) * 2);

writeln('dien tich = ', a * b);

readln

end.

Câu 3 :

uses crt;

var i, s : integer;

begin

clrscr;

s := 0;

for i := 1 to 30 do s := s + i;

write('s = ', s);

readln

end.

Câu 4 :

uses crt;

var n : integer; k : real;

begin

clrscr;

write('n = ');

for n := 1 to 100 do

begin

k := sqrt(n + n + 2018);

if trunc(k) = k then write(n : 4);

end;

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Tìm x để A < 0 ( A = -6 phần x +2 )

Bài 1: trong mặt phẳng tọa độ Oxy , cho 2 đường thẳng (d): y=(m-1)x -m (d'): 2mx+(m-1)y=2 (m là tham số) a) tìm m để đường thẳng (d) đi qua gốc tọa độ b) với giá trị nào của m thì (d)//(d') c) tìm m để khoảng cách từ gốc tọa độ đến đường thẳng (d') là lớn nhất Bài 2: 1) cho phương trình x ² - (m-2)x - m ² + 3m-4=0 (m là tham số) a) giải phương trình với m=-1 b) tìm m để phương trình có 2 nghiệm thỏa mãn tỉ số giữa 2 nghiệm của phương trình có giá trị tuyệt đối bằng 2 TRÌNH BÀY CHI TIẾT HỘ VỚI Ạ!!!

Trong thư gửi học sinh nhân ngày khai trường đầu tiên của nước Việt Nam độc lập, Bác Hồ thiết tha căn dặn: "Non sông Việt Nam có trở nên tươi đẹp hay không, dân tộc Việt Nam có bước tới đài vinh quang để sánh vai với các cường quốc năm châu được hay không, chính là nhờ một phần lớn ở công học tập của các em" Hãy viết 1 bài văn nghị luận trình bày suy nghĩ của em về nội dung lời căn dặn của Bác ( Có sử dụng yếu tố tự sự, miêu tả và biểu cảm ) Giúp mình với mai kiểm tra rồi :(

Trong các tác dụng của dòng điện đã học, nêu tên tác dụng của dòng điện được ứng dụng để chế tạo mỗi thiết bị sau: ắc quy, chuông điện, nồi cơm điẹn

Cho 26g kẽm tác dụng với dung dịch axit HCl a) Viết phương trình hóa học xảy ra b)Tính khối lượng của ZnCl2 c)Tính thể tích hiđro thu được Mn giúp mik với ạ

giải bất phương trình 7 - | 2 x + 1 | < -3

Viết pthh của rượu etylic axit axetic chất béo glucozo saccarozo tinh bột

A=2/3.(3/2.5+3/5.8+3/8.11+..+3/95.98) Tính hộ mình A

Giờ ra chơi, các bạn nam lớp 8A mang bóng vào đá trong phòng học, đang hăng say, T sút mạnh quả bóng về phía lớp học rồi bóng bay vào cửa làm vỡ kính. Thấy thế, tất cả đã bỏ chạy. Hỏi : a ) Em có nhận xét gì về việc làm của các bạn đó? b ) Nếu nhìn thấy sự việc đó em sẽ làm gì? c ) Bài học rút ra từ tình huống trên là gì ? Mình chỉ cần trả lời câu c thôi ạ

viết đoạn văn 200 chữ trình bày giải pháp để cuộc sống trở nên ý nghĩa hơn mn giúp e với e cảm ơn ạ

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến