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.

co 4 loi sai

if a mod 2:=0 là sai ở chỗ :

writeln(a,'la so chan); là sai ở chỗ sau chữ n thiếu dấu '

writln sai ở chỗ thiếu chữ e

(a,'la so le') sai ở chỗ thiếu chấm phẩy sau cùng

30 tháng 3 2020

A) Sai vì dư dấu " ; " trước chữ " then "

B) Sai vì thiếu chữ " write( " sau chữ " then "

C) Sai vì thiếu dấu " = " ở lệnh gán giá trị

D) Sai vì thiếu dấu " : " trước dấu " = " ở lệnh gán giá trị

A: Sai vì dư dấu ;

B: Sai vì thiếu dấu (

C: Sai vì thiếu điều kiện và thiếu dấu = ở phép gán

D: Đúng

20 tháng 4 2023

a) Lỗi: Dư dấu ; sau từ do

b) Lỗi: While i>20 then (sửa: While i>20 do)

c) Lỗi: B=B+2; (sửa: B:=B+2;)

d) Lỗi: dư dấu ; sau từ do

e) Lỗi: S=S*2; (sửa: S:=S*2;)

f) Lỗi: i:=1 (sửa: i:=1;)

16 tháng 3 2021

Real => byte 

Chắc chắn là bạn phải thay kiểu dữ liệu Real sang Integer hoặc Byte rồi bởi vì Với vòng lặp for, biến đếm không bao giờ là số thực

16 tháng 12 2020

program bai1;

uses crt;

var x,y,n:integer;

begin

clrscr;

x:=7;

n:=2.68;

write('nhap so x:'); readln(x);

write('nhap so y:');readln(y);

if x mod 2 =0 then y:=y*x

else y:=y*n;

write('ket qua phep tinh la:', y);

readln

end.

16 tháng 12 2020

program bai1;

uses crt;

var x,y,n:integer;

begin

clrscr;

x:=7;

n:=2.68;

write('nhap so x:'); readln(x);

write('nhap so y:');readln(y);

if x mod 2 =0 then y:=y*x

else y:=y*n;

write('ket qua phep tinh la:', y);

readln

end.

25 tháng 4 2022

Câu lệnh đúng, không có lỗi.

21 tháng 12 2022

Chọn C

5 tháng 12 2021

Var cv, dt : integer
r : real;
Const pi = 3.14;
Begin
r = 5.5;
dt := pi*r*r;
writeln(‘Dien tich hinh tron la:,dt:8:2’);
readln
End.

2 tháng 12 2017

Đáp án D

14 tháng 3 2021

D OK NHA BẠN

a: Sai bởi chỉ số đầu lớn hơn chỉ số cuối

b: Sai vì chỉ số đầu, chỉ số cuối là số thực

c: Sai vì chỗ end thiếu chấm phẩy

d: Sai vì chỉ số đầu lớn hơn chỉ số cuối

e: Sai vì chỉ số đầu và chỉ số cuối là số thực

d: Đúng

30 tháng 4 2022

cảm ơn bạn nhayeu