Question

Sửa lỗi sai và viết lại thành một chương trình hoàn chỉnh

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;

Answer 1

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.

Answer 2

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.