14
Объяснение:
var k,i,j:integer;
begin
k:=0;
For i:=1 to 4 do
For j:=1 to i+1 do
k:=k+1;
write(k);
end.
14
Объяснение:
var k,i,j:integer;
begin
k:=0;
For i:=1 to 4 do
For j:=1 to i+1 do
k:=k+1;
write(k);
end.