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.

5 tháng 12 2017

nhap a,b gop lam 1 dc nhe

program Tich;

uses crt;

var a:b,Tich; integer;

begin

clrscr;

Write('nhap a va b='); readln(a,b);

Tich:a*b;

Writeln('tich cua a va b la:', Tich:1:0);

Readln;

end.

5 tháng 12 2017

program Tich;

uses crt;

var a,b,Tich : integer;

begin

clrscr;

Write('Nhap a ='); readln(a);

Write('Nhap b='); readln(b);

Tich := a*b;

Writeln('Tich cua a va b la: ',Tich:8:20);

Readln;

end.

program nhom_ppt;

uses crt;

begin

writeln('Nhom chung minh Phan,My,Minh');

writeln('Chuc cac ban hoc tot');

readln;

end.

16 tháng 12 2021

Program kiemtra: -> kết thúc phải là dấu ';', sửa: Program kiemtra;

Use crt -> thiếu dấu ';' khi kết thúc 1 lệnh, sửa: Use crt;

Var a, b: interger;

c: integerl; -> Sai tên kiểu dữ liệu, sửa: c: integer;

Begin

Clrscr;

a: = 10;

b = 3; -> lệnh gán sai, sửa: b:=3;

c: = a/b -> thiếu ';' khi kết thúc 1 câu lệnh sửa: c:=a/b;

Writeln(‘Gia tri cua c = ‘,c);

Readln;

End -> kết thúc thiếu dấu '.'. sửa: End.

31 tháng 10 2017

a) uses crt;

b) var dt, r: real;

c) Thiếu Begin

d) dt:= pi*sqr(r);

D
datcoder
Giáo viên
14 tháng 10 2023

Chương trình 1 có lỗi cú pháp, câu lệnh 2, 3 không khớp nối với câu lệnh 1, 4.

Chương trình 2 có lỗi logic, a = b thuộc trường hợp a > b sai nên chương trình đưa ra thông báo sai khi nhập hai số a, b bằng nhau.

5 tháng 5 2023

Lỗi: "program tinh_a_mu_ng" sửa lại: program tinh_a_mu_ng;

Lỗi: gia tri sửa lại: giatri

Lỗi: readin(n) sửa lại: readln(n);

Lỗi: i:=1 sửa lại: i:=1;

Lỗi: while i < n do sửa lại: while i <= n do

Lỗi: i:=i+2 sửa lại: i:=i+1;

Lỗi: writeln('a mu n bang : ", giatri); sửa lại: writeln('a mu n bang : ', giatri);

21 tháng 8 2018

a) uses crt;

b) var dt, r: real;

c) Thiếu readln(r);

d) dt:= pi*sqr(r);

29 tháng 8 2023

Lỗi 1: Dòng uses : crt; - Lỗi cú pháp do dấu hai chấm : không cần thiết. Sửa lại thành uses crt;.

Lỗi 2: Dòng var dt, r = real; - Lỗi khai báo biến không đúng cú pháp. Sửa lại thành var dt, r: real;.

Lỗi 3: Dòng clrscr; - Lỗi cú pháp do sử dụng hàm clrscr trong môi trường không hỗ trợ. Nếu muốn xóa màn hình, có thể sử dụng clrscr trong IDE hoặc xóa dòng này nếu không cần thiết.

Lỗi 4: Dòng writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2); - Lỗi cú pháp do sử dụng sai định dạng khi in giá trị. Sửa lại thành writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2:2); để in diện tích với đúng định dạng số thập phân.

18 tháng 2 2022

Tham khảo: 

program ct;

uses crt;

var a,b,h,S:integer;

begin clrscr;

   writeln('Nhap do dai hai day: '); readln(a,b);

   writel('Nhap chieu cao: '); readln(h);

     S:=h*((a+b)/2);

   writeln('Dien tich hinh thang do la: ',S);

readln;

end.

uses crt;

var s,a,b,h:real;

begin

clrscr;

readln(a,b,h);

s:=(a+b)/2*h;

writeln(s:4:2);

readln;

end.

chắc là sau readln nếu có thêm chấm phẩy

15 tháng 11 2021

program chuong_trinh thiếu chấm phẩy

Sửa lại: program chuong_trinh;