viết khai báo cho bài toán S = a × b viết chương trình cho bài toán trên

2 câu trả lời

uses crt;
begin
clrscr ;
write ('a,b=') ;

readln (a,b) ;
s:=a*b ;
writeln (s) ;
readln
end.

Khai báo: var s,a,b:longint;

Chương trình:

uses crt;
var s,a,b:longint;
begin
clrscr;
   write('a,b=');readln(a,b);
   s:=a*b;
   writeln(s);
readln
end.

Câu hỏi trong lớp Xem thêm