September 2018 1 16 Report
Apa keluaran Program ini?

var i,j,x: integer;
begin
x := 0;
for i:=1 to 5 do begin
for j:= 5 downto 1 do begin x := x + i + j;
end;
end;
writeln(x);
end.

More Questions From This User See All

Recommend Questions



Life Enjoy

" Life is not a problem to be solved but a reality to be experienced! "

Get in touch

Social

© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.