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.

7 tháng 12 2021

Program tim_gia_tri_lon_nhat thiếu ;

=> Program tim_gia_tri_lon_nhat;

clrscr thiếu;

=> clrscr;

Các câu ở dưới bạn cũng thêm dấu; nhé

Lưu ý: lệnh readln không cần ; cũng chạy được chương trình ( Mình làm rồi, nên bạn có thể tin mình )

Bạn chú ý dấu; nha. Nếu ko có là sai hết chương trình đó vui

7 tháng 12 2021

Ah, writeln.... thì trong ngoặc bạn chỉ cần ( '..... ' ) vậy thôi nhá.

Không phải là ( " '....... ' " ) là sai. Bạn chú ý hơn trong khi viết chương trình nhé ok

23 tháng 2 2021

cú pháp: if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;

cách thực hiện:

 Dạng đủ: Chương trình sẽ kiểm tra điều kiện nếu điều kiện đúng thì  làm câu lệnh 1 sau đó làm câu lệnh tiếp theo, nếu điều kiện sai thì chương trình sẽ bỏ qua câu lệnh 1 và làm câu lệnh 2 sau đó làm câu lệnh tiếp theo.

Vd: Câu lệnh sau:uses crt;

var i,n: integer;

begin

clrscr;

writeln('nhap i: '); readln(i);

writeln(nhap n: '); readln(n);

if i>5 then writeln(i) else writeln(n);

{trong trường hợp này nếu nhập i lớn hơn 5 thì sẽ xuất i ra màn hình nếu không thì xuất n ra màn hình.}

 

Cú pháp: if <điều kiện> then <câu lệnh 1>

else <câu lệnh 2>;

Vd: If a[i] mod 2=0 then inc(dem)

else inc(dem1);

uses crt;

var n:integer;

begin

clrscr;

readln(n);

if n mod 2=0 then writeln(n,' la so chan')

else writeln(n,' la so le');

readln;

end.

QT
Quoc Tran Anh Le
Giáo viên
18 tháng 11 2023

Lỗi cú pháp là lỗi do viết chương trình, câu lệnh sai cú pháp dẫn đến chương trình không hoạt động. Hầu hết các ngôn ngữ lập trình đều có công cụ hỗ trợ hạn chế, phát hiện lỗi cú pháp.

Lỗi logic là lỗi xảy ra trong trường hợp chương trình hoạt động nhưng đưa ra kết quả sai. Sử dụng bộ dữ liệu thử là cách thường được sử dụng để phát hiện lỗi logic trong chương trình.

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

if (n mod i=0) and (i%2=1) then write(i:4);

readln;

end.

12 tháng 5 2022

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

Chú thích:

For, to, do: là từ khóa.

Biến đếm: thuộc kiểu dữ liệu số nguyên.

Giá trị đầu, giá trị cuối: là giá trị nguyên.

Câu lệnh: có thể là câu lệnh đơn hay câu lệnh ghép.

12 tháng 5 2022

Tham khảo

-Cú pháp: For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

-Giải thích các thành phần:

FOR, TO, DO: là từ khóa.

-Biến đếm: thuộc kiểu dữ liệu số nguyên.

-Giá trị đầu, giá trị cuối: là giá trị nguyên.

-Câu lệnh: có thể là câu lệnh đơn hay câu lệnh ghép.

30 tháng 3 2021

bạn ơi câu a của bạn ý j ạ mk giải dc hết hỏi xíu thui

ý của câu a đầu là j ??

30 tháng 3 2021

vieets chưng trình hay j á

*Câu lệnh For..do

Dạng xuôi: for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

*Câu lệnh For..do

Dạng ngược: For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> do <câu lệnh>;

uses crt;

var a:array[1..1000]of integer;

n,i,k,min,vt:integer;

begin

clrscr;

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

if n=0 then writeln('Moi ban nhap lai')

else begin

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  write(a[i]:4);

writeln;

min:=a[1];

vt:=1;

for i:=1 to n do 

 if min>a[i] then

begin

min:=a[i];

vt:=i;

end;

writeln('So nho nhat la: ',min,' tai vi tri: ',vt);

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

for i:=1 to n do 

  if i<>k then write(a[i]:4);

end;

readln;

end.