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.

30 tháng 5 2021

repeat 6 [ repeat 6 [ fd 100 rt 36 ] rt 60 ]

25 tháng 4 2023

a)

program TenCuaMinh;
var
  i: integer;
begin
  for i := 1 to 10 do
    writeln('Tên của mình là: <tên>');
end.

b)

program MangSoNguyen;
var
  M: array[1..100] of integer;
begin
end.

 

 

3 tháng 11 2017

- Ta sử dụng câu lệnh lặp như sau:

REPEAT 4 [FD 40 RT 90]

REPEAT 4 [FD 80 LT 90]

- Kết quả:

15 tháng 5 2022

cảm ơn mình hiểu rồi

 

13 tháng 9 2023

Trong Scratch:

1. Đúng. Có ba khối lệnh khác nhau để thể hiện cấu trúc lặp trong thuật toán là: "Lặp lại vô hạn", "Lặp lại" và "Lặp từ ... đến ...". Các khối lệnh này được sử dụng để lặp lại một đoạn mã trong chương trình một số lần hoặc vô hạn.

2. Sai. Cấu trúc lặp có thể được sử dụng để lặp lại một đoạn mã trong chương trình một số lần nhất định, hoặc lặp lại vô hạn lần. Ngoài ra, cũng có thể sử dụng biến để điều khiển số lần lặp.

3. Sai. Cấu trúc lặp trong Scratch không chỉ sử dụng để lặp lại một lệnh mà còn để lặp lại một đoạn mã bao gồm nhiều lệnh.

4. Đúng. Điều kiện dừng lặp phải là một biểu thức logic để xác định khi nào cần dừng vòng lặp. Ví dụ, điều kiện có thể là một biến đếm số lần lặp, một biểu thức so sánh hoặc một biểu thức logic phức tạp hơn.

16 tháng 4 2023

program HienThiA;
var
  i: Integer;
begin
  i := 1;
  while i <= 10 do
  begin
    writeln('A');
    i := i + 1;
  end;
  readln;
end.

pascal nhỉ?

16 tháng 4 2023

Vg thank

Add fb Ánh Ngọc (súnn) ib 

Bài 1: 

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do 

  begin

s:=s+i;

inc(i);

end;

writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

Bài 2: 

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do 

  begin

s:=s+i;

i:=i+2;

end;

writeln('Tong cac so le trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

20 tháng 1 2022

crm ơn bạn nhiều nha

uses crt;

var a,t,i:integer;

begin

clrscr;

t:=0;

for i:=1 to 6 do 

  begin

readln(a);

if (a mod 2=0) then t:=t+a;

end;

writeln(t);

readln;

end.

30 tháng 3 2022

- Để viết chương trình chỉ dẫn máy tính thực hiện xác hoạt động lặp mà chưa xác định trước được số lần lặpta có thể sử dụng câu lệnh có dạng lặp với số lần chưa xác định.
 Câu lệnh lặp với số lần chưa xác định trước trong Pascal có dạng:

A. while < câu lệnh > do < điều kiện >;

B. while <điều kiện> do <câu lệnh>

C. while <điều kiện> do <câu lệnh>;

D. while < câu lệnh > do < điều kiện >
 

7 tháng 3 2021

 Bài toán cổ nào vậy bạn?