Mơn bn

uses crt;
var i,j: integer;
begin
clrscr;
    for i:=1 to 20 do for j:=1 to 33 do if 5*i+3*j+(100-i-j)/3=100 then writeln('Trau dung: ',i,' | Trau nam: ',j,' | Trau gia: ',100-i-j);
    readln
end.

Bạn xem có đc ko nha!

Đây là toán nhé!

Bạn tham khảo trong sách giáo khoa hoặc cách trang web khác nhé

I_Trắc nghiệm

Câu 1: Câu lệnh lặp For.....to..do kết thúc khi : Biến đếm lớn hơn giá trị cuối.

Câu 2: Khi sử dụng lệnh lặp While...di cần chú ý: Điều kiện dần đi đến sai.

Câu 3:Trong Pascal câu lệnh lặp với số lần chưa xác định trước có dạng:

WHILE <Điều kiện> DO <Công việc>

Câu 4: Việc đầu tiên mà While do cần làm la: Kiểm tra giá trị của < điều kiện >

II_ Tự luận

Câu 1:

Cú pháp: WHILE <Điều kiện> DO <Công việc>

Các bước hoạt động của lệnh lặp với số lần chưa biết trước:

Bước 1. Kiểm tra điều kiện

Bước 2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện câu lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại Bước 1.

Câu 2:

Một trong những cấu trúc quan trọng của lập trình cấu trúc là các câu lệnh cho phép lặp nhiều lần một đoạn lệnh nào đó của chương trình.

Cú pháp: WHILE <Điều kiện> DO <Công việc>

Cách thực hiện: Đầu tiên lệnh sẽ kiểm tra Điều kiện, nếu Điều kiện đúng thì thực hiện Công việc sau đó quay lại kiểm tra Điều kiện. Quá trình cứ thế tiếp tục cho đến khi Điều kiện sai thì kết thúc lệnh.

?

Bước 1: Mở Microsoft Paint, đây là ứng dụng được tích hợp sẵn trong Windows.

Chọn Start -> All programs -> Accessories -> Paint hoặc các bạn có thể mở Start Menu sau đó nhập Paint trong Search programs and files và chọn Paint.

Bước 2: Chọn biểu tượng Paint -> Open sau đó tìm đến hình ảnh cần thay đổi kích thước.

Bước 3: Trong Image các bạn chọn Resize.

Bước 4: Trong hộp thoại Resize and Skew các bạn chọn Resize theo Percentage (phần trăm) hoặc Pixels (đơn vị).

Nếu chọn Percentage, các bạn nhập số % kích thước ảnh các bạn muốn giảm, ví dụ giảm bằng 1 nửa kích thước ban đầu thì các bạn nhập 50 vào Horizontal thì tự động Vertical cũng sẽ hiển thị 50.