2 câu trả lời
Pascal:
uses crt;
var s:longint;
begin
clrscr;
S:=1+1+1+1+1;
writeln('S = ',s);
readln
end.
uses crt;
Var S:integer;
Begin
clrscr;
S:=1+1+1+1+1;
Write('tong S=1+1+1+1+1=',S);
Readln
End.
Pascal:
uses crt;
var s:longint;
begin
clrscr;
S:=1+1+1+1+1;
writeln('S = ',s);
readln
end.
uses crt;
Var S:integer;
Begin
clrscr;
S:=1+1+1+1+1;
Write('tong S=1+1+1+1+1=',S);
Readln
End.
