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.
Không đúng (biên dịch lỗi).
Ở dòng 3, lệnh Writel bị viết sai chính tả. Ở dòng 7 thực hiện khai báo biến cho 2 biến a b ở phía trong hàm chính (thay vì nằm phía trên).
Chắc chắn là chương trình sẽ bị lỗi rồi
Bởi vì thứ nhất là bạn phải khai báo a,b trước khi bạn nhập
thứ hai là ở dòng 3 chữ writel bạn viết sai chính tả rồi
Tên chương trình: có dấu cách, sửa: tinh_tong;
Khai báo biến sai cấu trúc, sửa : thay := thành :
Lệnh gán biến tong sai, sửa : tong:=a+b;
End thiếu chấm, sửa : end.
- program: có dấu cách
sửa: program tinh_tong;
- var: a, b, tong là các số khai báo kiểu nên không được dùng dấu gán
sửa: var a, b, tong : integer;
- phần begin: sai phần "tong = a+b", tổng phải được gán giá trị
sửa: tong := a+b;
- kết thúc chương trình: end viết thiếu
sửa: end.
Đìu lần nào sửa cũng quên :
Program baitap;
Var a,b,c: Integer, TB:real;
Const n = 3;
Begin
Writeln('nhap vao ba so a,b,c ') ; Readln ( a,b,c );
TB:=(a+b+c)/n;
Writeln('Trung binh cong cua 3 so do la ',TB);
Readln
End.
program tong hai so;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('nhap gia tri a);readln(a);
write('nhap so b'); readln(b);
c:=a+b;
writeln(tong cua hai so vua nhap la:',c);
readln;
end.
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.
t hong bt cái này ă, mà chỗ m lớp 8 đc hc tin học vui quá ha, t ko bt ba cái vụ này lun:<
chu choa